in reply to Matching ranges
Sometime $/ is just easier:
#! perl -slw use strict; $/ = 'Services'; scalar <>; ## discard everything up to the start of the bit you want $/ = 'Users'; print scalar <>; print the bit you want __END__ c:\test>junk31 junk31.dat ======================================================== blah glah sfsd asfsdf afsafdf ======================================================== Users
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Matching ranges
by ldbpm (Initiate) on Sep 02, 2010 at 02:54 UTC |