Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re^2: Reading from a glob into Getopt::Long

by biohisham (Priest)
on Apr 04, 2012 at 22:44 UTC ( #963545=note: print w/ replies, xml ) Need Help??


in reply to Re: Reading from a glob into Getopt::Long
in thread Reading from a glob into Getopt::Long

This quotation of the glob in the shell is awesome indeed !

Well, I think I was just overworking my brain to realize that I simply might as well use a flag in GetOptions, that will be neater and more efficient since I know a priori that I wanna deal with a specific file type format so I will just need to glob it internally on the program itself rather than from the shell, that will also give me the flexibility of adding another option or flag to process a file by passing its name as an argument to that option. I used File::Wildcard then to capture all these files and then process them as elements in an array.

use strict; use warnings; use Getopt::Long; use File::Wildcard; use Data::Dumper; my $foo = File::Wildcard->new(path=>"./*.tab.txt"); my @arrayFiles; GetOptions( "extract_all"=>\&goIt ); sub goIt{ while (my $file = $foo->next){ push @arrayFiles, $file; } #do something with @arrayFile #through a subroutine } print Dumper(\@arrayFiles);



David R. Gergen said "We know that second terms have historically been marred by hubris and by scandal." and I am a two y.o. monk today :D, June,12th, 2011...


Comment on Re^2: Reading from a glob into Getopt::Long
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://963545]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (6)
As of 2014-08-01 03:10 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite superfluous repetitious redundant duplicative phrase is:









    Results (256 votes), past polls