Do you mean like
unless($_ =~ /^\s*\d+\s*$/){ print $_; } ? -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Sent: Wednesday, February 22, 2006 2:36 PM To: beginners@perl.org Subject: whitespace beginning and end Perlers I need to remove any line that begins with \d+ yet end with \s* Here is the data _BEGIN_DATA_ <snip> _END_DATA_ Here is what I came up with and it works but any other ideas b/c I am unsure for every line with "2006/01/16 10:14 215 100% -il-o-b---U- sf F02059" for example will have a length of 62 or more. thank you! <snip code> -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>