Help for this page

Select Code to Download


  1. or download this
    open my $input_fh, '<', 'skaters.txt'
    or die "Can't read skaters.txt: $!";
  2. or download this
    my @skater_records
    = map { chomp; [ split /,/ ] }
      grep { /\S/ } <$input_fh>;
  3. or download this
    use strict;
use warnings;
...
Guido Chuffart: 88.2
Jack Creasey: 85.8
Cecilia Cornejo: 85.4