"John W. Krahn" schreef:
> [EMAIL PROTECTED] wrote:
>> The following Perl one-liner will do what you need
>> perl -n -e 's/(.{8,8}).(.*)/$1$2/;print ;'
>
> Or more simply as:
> perl -pe's/^(.{8})./$1/'
And a bit less simply as:
perl -pe's/(?<=.{8}).//'
--
Affijn, Ruud
"Gewoon is een tijger."
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
