Hello and Welcome from United States to the UNIX and Linux Forums! Thank You for Visiting and Joining Our Global Community.
|
Hello and Welcome from United States to the UNIX and Linux Forums! Thank You for Visiting and Joining Our Global Community.
|
|
google unix.com
|
|||||||
| Forums | Register | Forum Rules | Links | Albums | FAQ | Members List | Calendar | Search | Today's Posts | Mark Forums Read |
| Shell Programming and Scripting Post questions about KSH, CSH, SH, BASH, PERL, PHP, SED, AWK and OTHER shell scripts and shell scripting languages here. |
More UNIX and Linux Forum Topics You Might Find Helpful
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| SED: delete and print the only exact matched pattern | new_buddy | Shell Programming and Scripting | 6 | 07-09-2008 05:19 AM |
| Replacing a word after a matched pattern | maxmave | Shell Programming and Scripting | 1 | 06-12-2008 04:54 PM |
| HELP! PERL script to find matched pattern | kimhuat | Shell Programming and Scripting | 1 | 05-12-2008 11:24 AM |
| Count of matched pattern occurance | palash2k | UNIX for Dummies Questions & Answers | 3 | 04-24-2008 04:33 PM |
| appending with sed based on matched pattern | jack1981 | Shell Programming and Scripting | 2 | 07-20-2006 07:54 AM |
Powered by 
|
|
|
LinkBack | Thread Tools | Search this Thread | Rate Thread | Display Modes |
07-22-2008
|
||||
|
||||
|
print last matched pattern using perl
Hi,
If there exist multiple pattern in a file, how can I find the last record matching the pattern through perl. The below script searches for the pattern everywhere in an input file. Code:
#! /usr/bin/perl -s -wnl
BEGIN {
$pattern or
warn"Usage: $0 -pattern='RE' [FILE1 ....]\n" and
exit 255;
}
/$pattern/ and print;
Regards Ashu Last edited by er_ashu; 07-22-2008 at 08:00 PM.. |
| Bookmarks |
| Thread Tools | Search this Thread |
| Display Modes | Rate This Thread |
|
|
Threaded Mode
