----- Original Message ----- From: "bruce" <[EMAIL PROTECTED]>
> something like this...
> $line =~ /(skip 3 chars)(get 5 chars)(skip 3 chars)...../
Maybe I am misunderstanding the question but do you mean like:
while ($input=~s/.{3}(.{5})// {
$line=$1;
}
Cheers
Bod
_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
