And I would probably write it like this:
if ( /9840S/ and /ebexpire, ebexpire/ and ($_ =~ $dm or $_ =~ $dmm) ) {
Or even:
if ( /9840S/ and /ebexpire, ebexpire/ and (/$dm/ or /$dmm/) ) {-- Gunnar Hjalmarsson Email: http://www.gunnar.cc/cgi-bin/contact.pl
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
