in reply to Reg. Expression problem

perhaps you want: 
use strict;
use warnings;

open IN, "file.txt" or die "can't open : $!\n";

while (<IN>)
{
   # perform some tests on $_
   # if its a good line, print it.
}
close (IN);

[download]
if you want anything more, you have to give us more details.

jeff

ps. use HTML formatting, <BR>, instead of carriage returns.

Replies are listed 'Best First'.
RE: Re: Reg. Expression problem
by Anonymous Monk on Aug 02, 2000 at 20:37 UTC
    I have a huge file that contains several lines. How do I use regular expression to match the one I want. let's say the file is like this perlmonks 1
    perlmonks(1) 2
    perlmonks(perl) 3
    'perlmonks (67) 4
    ..... ... and so on... Let's say I just want to print 1
    3
    4
    (skiping that perlmonks part I just wanted to print the numbers I want on the right side. Thankx
[reply]
      allright... how about: 
      while (<FILE>)
{
   print "$1\n" if $_ =~ m/(\d+)$/
}

      [download]
      this will print the last number on each line, if it is the last character on the line. for any more help, you're going to have to let us know how you decide that you want to print something.
[reply]
[d/l]
        Thankx jeff, If I want, suppose, 32 different numbers. 1, 34 , 45, 62...and other random ones
        Do I have to write all the numbers or is there any other easier way?.......
[reply]

In Section Seekers of Perl Wisdom