FlashMX wrote:
Cool...that worked...thanks
I forgot to mention that one the match is found I do a search and replace
if (/[0-9.]{6} setgray/) {
s/.90000 set/-50.2 v \n.90000 set/;
This is the issue. I need to "grab" the match number (whatever it is) and add
it into the s/
So...
if (/[0-9.]{6} setgray/) {
s/NUMBER_FROM_ABOVE set/-50.2 v \nNUMBER_FROM_ABOVE set/;
if ( s/(?=[\d.]{6} set)/-50.2 v \n/ ) {
do_something_else();
}
John
--
use Perl;
program
fulfillment
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
