Jensen Kenneth B Sra Afpc/Dpdmpq wrote:
> >
> >$_spath =~ s{^\.}
> > { $path = `pwd`;
> > chop $path;
> > $path
> > }e;
>
> I wasn't aware I could have multiple commands in there. Had to change it
> around so perl4 would be happy, no white space and restricted to using s///.
> Thanks
> $_spath =~ s/^\./$path =`pwd`;chop $path;$path/e;
You don't have to change it, that is valid Perl4 syntax and will work as
is. The use of delimiters other than / has been available since Perl1
and the use of /e since Perl3.
John
--
use Perl;
program
fulfillment
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]