Re^3: Error Undefined subroutine &main::OPEN called at C:\Perl\sku_corr2.pl line 8.

[cmac]

If any of your input lines doesn't have 36 tabs in it, the split will leave $SKU undefined. To avoid the error message, add a line between before the print something like if (!defined $SKU) {$SKU = "<<<undef>>>"}