- or download this
perl -lpe 'BEGIN{$SIG{PIPE}="exit"; $|=1; $/=\108; ($/) = (<> =~ /^.{1
+05}(.?\r?\n?)/); seek ARGV, 0, 0}'
- or download this
perl -lpe 'BEGIN{$SIG{PIPE}="exit"; $|=1; $/=\108; ($/) = (<> =~ /^.{1
+05}(.?\r?\n?)/); seek ARGV, 0, 0}' | grep ^NM1
- or download this
perl -lne 'BEGIN{$SIG{PIPE}="exit"; $|=1; $/=\108; ($/) = (<> =~ /^.{1
+05}(.?\r?\n?)/); seek ARGV, 0, 0} print if /^NM1/'