http://qs1969.pair.com?node_id=542459


in reply to readdir() only returns one result when used with Fatal.pm

Hmm and I thought it would only prevent onliners :-( 
$ perl -MFatal+qw/open close/ -e 'open( F, "fasel"); print <F>;close F
+;'
Can't open perl script "close/": No such file or directory

[download]

Replies are listed 'Best First'.
Re^2: readdir() only returns one result when used with Fatal.pm
by demerphq (Chancellor) on Apr 11, 2006 at 11:52 UTC

    You should reread the error message you got there. 

    perl -MFatal+qw/open close/ -e 'open( F, "fasel"); print <F>;close F;'
Can't open perl script "close/": No such file or directory

    [download]

    should be written 

    perl -MFatal=open,close -e 'open( F, "fasel"); print <F>;close F;'

    [download]

    or on win32:

    perl -MFatal=open,close -e "open( F, q(fasel)); print <F>; close F;"

    [download]

    which produces 

    Can't open(F, fasel): No such file or directory at (eval 1) line 3
        main::__ANON__('F', 'fasel') called at -e line 1

    [download]
    ---
    $world=~s/war/peace/g

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom