On Thursday, May 30, 2002, at 08:28 , Rohesia Hamilton Metcalfe wrote:
[..]
>
> Any help much appreciated.
>
> Rohesia

perlsonally I'm a fore and aft fan and would have done it like

        my $fore = 'f-';
        my $aft = '.cgi';

        my $ScriptName = $1 if ($RandomScript =~ /$fore # all the stuff before 
it
                                                                  (.*)          # $1 - 
the stuff we want
                                                                  $aft/xo);     # all 
the stuff aft of it
                                                                
        print "foreand aft says :$RandomScript: undt :$ScriptName:\n";

which will be more 're-usable' in the long run, and
of course has the if check as welll...

ciao
drieux

---


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to