Help for this page

Select Code to Download


  1. or download this
    print "@data\n";
  2. or download this
    print OUTF "@data\n";
  3. or download this
    open(OUTF,">>combine.csv") or dienice("Can't open CSV file: $!");
foreach my $file ( @files ) {
    open(INF,"$file") or dienice("Can't open data file: $!");
...
    close(OUTF);
}
close(INF);