Sorry bout that blank email...
anyway... I thnk this would work
$filename =~ /(?:jpe?g$)|(?:tif?f$)/i
I think this one is wrong because you actually have
two patterns here...
if ($file_name !~ /tif$/i | /jpg$/i) {}
maybe you could try doing it like this..
if($file_name !~ /(tif$)|(jpg$)/i
note that I only used a pair of //...
--- pablo wablo <[EMAIL PROTECTED]> wrote:
>
> --- Jeffrey Paul Burger <[EMAIL PROTECTED]> wrote:
>
> > I tried everything I could think of to get this to
> > work before pleading for
> > help!
> >
> > I need to check if a file is either a TIFF or JPEG
> > graphics file.
> > (Case-insensitive variations of qualifying
> suffixes
> > would be .tif, .tiff,
> > .jpg and .jpeg.) So far I have three difference
> > versions of what seem to be
> > a valid line of code to test a single pattern.
> > ($file_name holds the name of
> > the file. Also, for logic reasons, I'm testing
> that
> > it's NOT one of these
> > types):
> >
> > if ($file_name !~ /tif$/i) {}
> >
> > if ($file_name !~ m/tif\b/i) {}
> >
> > if ($file_name !~ m/.*.tif/i) {}
> >
> > But I can't for the life of me figure out how to
> > structure a working version
> > of a more complex variation on any of the these
> that
> > test all four cases (or
> > even a second one, for that matter). From my
> > reading, I would expect the
> > following to work, but it doesn't:
> >
> > if ($file_name !~ /tif$/i | /jpg$/i) {}
> >
> > Any help would be greatly appreciated.
> >
> > Thanks!
> >
> > Jeffrey Paul Burger
> > 2675 W. Hwy. 89A - PMB 455
> > Sedona, AZ 86336
> > 928-203-0170
> >
> > "There are only two ways to live your life.
> > One is as though nothing is a miracle.
> > The other is as if everything is."
> > --Albert
> > Einstein
> >
> >
> >
> >
> > --
> > To unsubscribe, e-mail:
> > [EMAIL PROTECTED]
> > For additional commands, e-mail:
> > [EMAIL PROTECTED]
> > <http://learn.perl.org/>
> > <http://learn.perl.org/first-response>
> >
> >
> >
>
>
> __________________________________________________
> Do You Yahoo!?
> Tired of spam? Yahoo! Mail has the best spam
> protection around
> http://mail.yahoo.com
>
> --
> To unsubscribe, e-mail:
> [EMAIL PROTECTED]
> For additional commands, e-mail:
> [EMAIL PROTECTED]
> <http://learn.perl.org/>
> <http://learn.perl.org/first-response>
>
>
>
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
