* Arthur Bergman ([EMAIL PROTECTED]) [18 Jan 2002 09:53]:
> > * Arthur Bergman ([EMAIL PROTECTED]) [18 Jan 2002 01:59]:
> > > >         $foo =~s/PoCo/POE\/Component/;
> >
> > > yes, this line is not portable
> >
> > See File::Spec
>
> won't help, since File::Spec does not have the file path separator.

use File::Spec;
my $x = File::Spec->catfile('POE', 'Component');
$foo =~ s/PoCo/$x/;

Err, right?

(or $foo =~ s/PoCo/File::Spec->catfile('POE','Component')/e; )


Or am I missing something else? You want to concatenate paths as far as
I can tell.



cheers,
-- 
iain.                                          <http://eh.org/~koschei/>

Reply via email to