in reply to Read from and write to file
I'm assuming here that the format of @file looks something like this:foreach my $line ( @file ) { if ($line=m/^\s*$subname\s*:\s*(\S*)/i) { do something, we found it } }
and addresses have no spaces in them.submane1: address1 subname2 : address2 ...
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Read from and write to file
by Anonymous Monk on Apr 09, 2007 at 17:19 UTC |