in reply to Re^2: Bulk Reading and Writing of Large Text Files
in thread Bulk Reading and Writing of Large Text Files

I changed your declaration line

from:

my ($record, $date, $outfile, $station, $sstation, $linecnt, $pcntg, @
+values);
#.............................^^^^^^^^

[download]

to

my ($record, $date, $outfile, %stations, $sstation, $linecnt, $pcntg, 
+@values);
#.............................^^^^^^^^^

[download]

You didn't!

With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.

Replies are listed 'Best First'.
Re^4: Bulk Reading and Writing of Large Text Files
by Sterling_Malory (Initiate) on May 21, 2013 at 13:54 UTC

    I was hoping to not have to ask anything again but I am stumped with this one! 

    [s1269452@burn MIDAS_DATA]$ perl bulk_reorder_2105.txt midas_wxhrly_19
+9901-199912.txt "1999-12-15 11:00" 19260 19261 19262 [...]
exists argument is not a HASH or ARRAY element or a subroutine at bulk
+_reorder_2105.txt line 27.

    [download]
    Thank you
[reply]
[d/l]

      What does line 27 look like?

      With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'
      Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
      "Science is about questioning the status quo. Questioning authority".
      In the absence of evidence, opinion is indistinguishable from prejudice.
[reply]

        Sorry are you referring to the if statement which creates the hash depending on the conditions defined by the "exist" function?

        I just got it to work but the program stops iterating after after finding one entry.

[reply]

In Section Seekers of Perl Wisdom