in reply to Trying to convert shell script to Perl
Update: added split to better emulate shell scriptfor $DIR (split/\s+/,`ls -d [a-k]* lts mon [n-z]*`){ if (-d "$DIR/bld"){ system (qq(cd $DIR/bld;cbsfpfg.exe `echo "cbs"$DIR$RELEASE $DI +R`)); } }
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: Re: shell problem
by graff (Chancellor) on Aug 06, 2002 at 03:01 UTC |
In Section
Seekers of Perl Wisdom