GLOB & FILE

anek77713 has asked for the wisdom of the Perl Monks concerning the following question:

Hey!

I have this code:

...

    my $chapter = shift;
    my $name    = ( splitpath $chapter )[-1];
    my $htmldir = catdir( qw( html ) );
    $name       =~ s/\.pod/\.html/;
    $name       = catfile( $htmldir, $name );
    open my $fh, '>:utf8', $name
    or die "Cannot write to '$name': $!\n";
    print $fh;
    return $fh;
}
[download]

And I get "GLOB(0x109ad10)" when printing "$fh" - how can I get the name of the file from $fh, not simply from "$name"

Comment on GLOB & FILE Download Code

Replies are listed 'Best First'.
Re: GLOB & FILE (filehandle doesn't store filename) by Anonymous Monk on Aug 12, 2013 at 07:24 UTC
And I get "GLOB(0x109ad10)" when printing "$fh" - how can I get the name of the file from $fh, not simply from "$name" You can't, see retrieve filename from filehandle?, filenames from filehandles, Retriving Filename from Filehandle, Filename from filehandle?, https://metacpan.org/module/Path::Tiny#openr-openw-openrw-opena	[reply]
Re: GLOB & FILE by jakeease (Friar) on Aug 12, 2013 at 07:31 UTC
File::Spec is object-oriented, so you don't want to call subroutines directly. Instead call them as class methods: `File::Spec->catfile('a','b');`	[reply] [d/l]
Re^2: GLOB & FILE by Anonymous Monk on Aug 12, 2013 at 09:39 UTC
File::Spec is object-oriented Not really :) It might be class-oriented though :) so you don't want to call subroutines directly You kind of do if you're using File::Spec::Functions OTOH, Path::Tiny has constructor path() with many methods :)	[reply]