in reply to trying to do a parse based on starting position.
use strict; use warnings; while (<>) { if (/LUN 40/) { $_ = <>; $_ = <>; print; } } __END__ 60:06:01:60:5C:4F:22:00:88:43:D4:39:04:F7:DD:11
This may also be of interest: UNIX 'command' equivalents in Perl
|
|---|