
digioleg54
User
Jun 9, 2017, 8:37 AM
Post #1 of 3
(1991 views)
|
Use of uninitialized value problem in Perl script
|
Can't Post
|
|
I continue my last post. I have a code:
foreach my $line (@records) { print "We are in the record $line\n"; chop; if (/ TBA/) { my$ln_tp=$_; It is reading line and print it, however in the error_log I see
Use of uninitialized value $_ in scalar chop at tests1.pl line 47. Use of uninitialized value $_ in pattern match (m//) at tests1.pl line 48. 47 - chop, 48 if Could you please correct the code, if it is wrong? This is one of the line
CUSIP|20170504|DMG |100.6340625||1544000 We are in the record CUSIP|20170504|DMG |100.6340625||1544000 The code is not mine, I have to fix it. And I don't understand what is. It is trying to compare something with TAB? I don't see, what can be compare like that Thanks
(This post was edited by digioleg54 on Jun 9, 2017, 9:14 AM)
|