File Perl

  1. Home
  2. Perl
  3. File
  4. Output file
open(SORT, "| sort" ) or die;  # Open pipe to write to
print SORT "dogs\ncats\nbirds\n"    #  Sorts birds, cats, dogs on separate lines.