You need to give a little more information. What kinds of error messages are you getting? What does the output look like?
Here are some suggestions, though:
When you open files, always use error handling:
open (FILE, "file.txt") or die "Can't open file: $!";
You are wasting a ton of memory by loading the files into arrays completely. instead, use a loop like this:
while (<FILE>)
{
#put stuff in the hash here
}
Then, as soon as you are done with a file, it is good practice to close it.
Those lines that define the keyhash aren't doing what you expect. They are just adding erroneous elements to keyhash. Perl will automatically add whatever you tell it to, there's no need to tell it what to expect.
Don't use
for to loop through an array. Use
foreach. While
for will work the same most of the time, it can bite you.
You should probably read the perlref and perllol man pages to learn how to use complex data structures. While you're almost there, you make some errors. For example,
$hashref{$_}{CSV};
should be
${$hashref{$_}}{CSV};
I know this can get confusing, I've messed it up plenty of times myself.
When's the last time you used duct tape on a duct? --Larry Wall
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.