Newbie not getting expected values from s/// operator

[Ken Tozier]

I wrote a simple script to extract some of the info Photoshop 6 embeds 
in jpeg files through the "file info" dialog box and find that I can 
extract the info no problem with:

open(PROPS, 'egrep -a \'<photoshop:([^>]+)>[^<]*</photoshop:\1>\' 
"botanical-garden12-full.jpg" | ');

Doing print <PROPS>; shows that the info I'm looking for is indeed 
extracted.

Next I try to loop through the results and extract parts of each string 
like so:

$tmp = "";
while (<PROPS>)
{
        $tmp .=  s/<photoshop:([^>]+)>([^<]*)/$1: $2/;
}
Doing a "print" on $tmp, yeilds

1111111111111

None of the lines in "PROPS" contain a single digit character so why am 
I getting a string of 1's?

Thanks for any help

Ken



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