Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much

Re: Use of special character "*" to retrieve the contents

by shmem (Chancellor)
on Jun 07, 2017 at 13:05 UTC ( #1192269=note: print w/replies, xml ) Need Help??

in reply to Use of special character "*" to retrieve the contents

See glob.

for (glob "$var1/$var2/$var3/*.ksh") { print "$_\n"; }

For portability, it is better to use File::Spec:

use File::Spec; ... my $pat = File::Spec->catfile($var1,$var2,$var3,'*.ksh'); for(glob $pat) { print "$_\n"; }
perl -le'print map{pack c,($-++?1:13)+ord}split//,ESEL'

Replies are listed 'Best First'.
Re^2: Use of special character "*" to retrieve the contents (updated)
by haukex (Abbot) on Jun 07, 2017 at 14:06 UTC

    When I see the use of glob I often feel compelled to point out that it has its caveats, such as how it handles whitespace in its argument, and also that it does not list filenames beginning with a dot by default (which might be surprising to users when compared to readdir or File::Find). A thorough read of glob and File::Glob, which implements the former, is recommended.

    Update: While File::Spec is often very good advice, I looked into this a bit, and note that the File::Glob doc discusses how on Win32, backslashes can interfere with escaping, and that forward slashes are recommended.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1192269]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (6)
As of 2018-07-16 03:18 GMT
Find Nodes?
    Voting Booth?
    It has been suggested to rename Perl 6 in order to boost its marketing potential. Which name would you prefer?

    Results (330 votes). Check out past polls.