develooper Front page | perl.beginners | Postings from January 2022

Re: Is this bit of scrip a reasonable way to test something

Thread Previous
From:
Hal Wigoda
Date:
January 3, 2022 03:54
Subject:
Re: Is this bit of scrip a reasonable way to test something
Message ID:
A4414FEA-C983-48F6-9183-88CEE1DA4BC6@gmail.com
TOMTOWTDI


(Sent from iPhone, so please accept my apologies in advance for any spelling or grammatical errors.)

> On Jan 2, 2022, at 9:29 PM, hput via beginners <beginners@perl.org> wrote:
> 
> I was just coding in in ksh93 for simple script but tangled up with
> way matching and regex work in ksh93.
> 
> Finally trashed it turned to perl.
> 
> Just have familiarity with one way of test in shell script:
> 
> Put it in an if clause like (in shell):
> 
> 
>  if [ cd somedir ];then
>    print "ok permissions were good to enter somedir"
>  fi
> 
> -------       -------       ---=---       -------       ------- 
> Wanting to see if an encrypted dir is open
> -------       -------       ---=---       -------       ------- 
> 
>  #!/usr/local/bin/perl
> 
>  use strict;
>  use warnings;
> 
>  my $loc = './s';
> 
>  print "Testing with `chdir', if my perms are good to enter $loc\n";
> 
>  if (chdir $loc) {
>    print "my perms  worked to enter <$loc>\n";
>  }
> 
> Is this a reasonable way to do this or am I missing some thing that
> will be quicker and more `perl' like?
> 
> 
> -- 
> To unsubscribe, e-mail: beginners-unsubscribe@perl.org
> For additional commands, e-mail: beginners-help@perl.org
> http://learn.perl.org/
> 
> 

Thread Previous


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About