Re: Perl 5.12: Problems with VMS file name processing

On Apr 23, 2010, at 11:37 AM, [email protected] wrote:

> here is another reproducer for a 5.12 problem (this might be  
> something for
> Robert). The following little script fails:
>
> use File::Copy;
>
> my $from = 'sys$login:from.lis';
> my $to   = 'sys$login:to.lis';
>
> system("create/fdl=nl: $from") ;
> copy($from, $to) || warn ("Copy failed:", $!);
>
> The failiure condition is that the file spec does not contain an  
> explicit
> directory spec (i.e. dsa0:[zinser]to.lis works).

Hmm.  What does this give you with 5.8.6:

$ perl -"MFile::Spec" -e "print File::Spec->catpath('foo:', q(),  
'bar');"
foo:[]bar

________________________________________
Craig A. Berry
mailto:[email protected]

"... getting out of a sonnet is much more
  difficult than getting in."
                  Brad Leithauser