The variable you're splitting appears to be a remnant of some earlier operation. Try changing
to@thermos = split (/\s+/, $thermos);
@thermos = split (/\s+/, $data_line);
In reply to Re: foreach problem
by dws
in thread foreach problem
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |