while(<FILE1>){
   my $value = <FILE2>;
   $hash{$_} = $value;
}
print FILE3 join("\n", map({"$_ = $hash{$_}"} keys %hash));

[download]

That will readu lines from file handle FILE1 and use it as a key, the value being the corresponing line in FILE2. Is it that simple? Is there some more logic I need to know about? Do you really want line1 from file1 to be the key to line1 from file2? If so that above will do it (I left out the actual opening of the files, but I assume you can do that part).

Update: You should chomp $value, as L~R so astutely points out in his code above.

A truely compassionate attitude towards other does not change, even if they behave negatively or hurt you

—His Holiness, The Dalai Lama

In reply to Re: adding text from different txt file into hash by JediWizard
in thread adding text from different txt file into hash by MrChat

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • 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:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.