Help for this page

Select Code to Download


  1. or download this
    my $columns = [ qw (one two three) ]; # sample data is GOOD
    print join "\t",@{$columns}. "\n";
    print join ("\t",@{$columns}). "\n";
    
  2. or download this
    print join "\t",@{$columns}, "\n";