RE: [Perl-unix-users] match function

2003-08-14 Thread James Schappet
Hong, Here a few untested examples, I have tried to skip shortcuts to make things a little more clear. my @FILELIST = @ARGV; foreach $file (@FILELIST) { # Skip all files with .doc extention. next if ($file =~ m/\.doc$/); # do something. } OR foreach $file (@FILELIST) {

Re: [Perl-unix-users] match function

2003-08-14 Thread $Bill Luebkert
Hong Wang wrote: > I like to check if file with .doc extension will be excluded. for example, > if file name is todo.doc: > > > How can I use match function? What I did is not working. What I tried: > > if($file !~ /\.doc/) > { > do something > } > > or > > if($file !~ /.doc/) That shou