ANSWERED - THANKS Hello, looking at my sortDictionary, it should be reading in a list of words/definitions from the hash array (%dictionary). Well I want to pass each line it creates into another function writeFiles and what that would do is create a file using the first letter of the line passed in and seeing if its part of the alphabet and then writing it to the file. The problem is, this writeFiles function only works once, and once its done, it does not go back to the sortDictionary to continue sorting/making lines and passing them back to WriteFiles again. So it only does it once. But it should do it as many times as there are keys. Thank you for your help. 

sub sortDictionary {

   foreach my $key (sort keys %dictionary) {
      $key =~ /^(.)/;
      my $lline = $key . '/' . $dictionary{$key};
      #print $lline;
      $line = $lline;
      writeFiles($line);
   }
}

sub writeFiles {
   @alphabet=(a..z);

   $letter = substr($line,0,1);
   $namestub = "_words";

   for ($i; $i<26; $i++);
   $filename = @alphabet[$i] . $namestub . ".txt";

   if ($letter eq @alphabet[$i]){
      open FILE, "+>", $filename or die $!;
      print FILE "$line\n";
      print @alphabet[$i];
      close FILE;
   }
   }
   return 0;
}

[download]

In reply to Function skips by borovez

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.