poj This is a good read, and it will probably help me with my next task (rearranging the data fields).
In my testing it led me to wonder why I didn't need the "()" around the "$row->5" when it is inside a print string. Below is my sample which works, but I don't understand why I don't get back a "1". Is the " character special in this case, or a lack of the "=" or "=~"?
($row->[15]) = $row->[5] =~ /(#[^ ]+)/;
print "$row->[5]\t$row->[15]\n";
#output
TRAY HINGED PLSTC 20 CAV #F32473 #F32473
PAD FOAM 24 X 24 X 1/4 #16193 112 SHEETS PER ROLL ORDER IN FULL ROLLS
+ #16193
PKG LIST ASST ARM RAD 300 #F37784 #F37784
PAD TOP CAP RE17-30048 #F30121 CORRUGATED ASSEMBLY 22-7/8 X 21-1/8 X 4
+-3/4 #F30121
|