for my $i (1 ... $num) {
s/$pat/$pat+$i/;
}

Get me?

-- 

Jason Ledbetter
Data Conversion Specialist
Perl Monk and Ascii Ninja
Cadmus Professional Communications
[EMAIL PROTECTED]


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to