Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re: Cannot work on second file after reading first file.

by sn1987a (Monk)
on Feb 28, 2014 at 18:45 UTC ( #1076594=note: print w/ replies, xml ) Need Help??


in reply to Cannot work on second file after reading first file.

The immediate problem is the undef $/; in open_po. Replace it with local ($/);

A couple notes on my process for debugging this:

First, I used Data::Dumper to dump the result of call $csv->getline_all to see the entire parse being returned. This verified the only thing being returned was the header row.

Then I commented out the call to open_po and saw that the file was not being parsed correctly. This meant the problem was some state being globally modifed in open_po.

Study of that sub lead to the problem


Comment on Re: Cannot work on second file after reading first file.
Select or Download Code
Re^2: Cannot work on second file after reading first file.
by 1straw (Novice) on Feb 28, 2014 at 19:06 UTC

    Thank you sn1987a! This solved the problem.

    I will learn to use Data::Dumper & read the debugger tutorial suggested as well.

    SUMMARY:

    1) A subroutine to open and read a CSV file worked fine in isolation but stopped working when integrated into larger script.

    2) The problem stemmed from an earlier subroutine (open_po) which globally modified the input record separator ($/) through: undef $/;

    3) The problem code was modified to change the state locally, according to sn1987a's post to: local ($/);

    4) This modification solved the problem.

    Thank you all for your help!

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1076594]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (10)
As of 2014-09-18 10:44 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (111 votes), past polls