Select Code to Download

use strict;
use warnings;
...
    print "File line $.\n";
    print "  $headers[$_]: '$row->[$_]'\n" for reverse 0 .. $#$row;
}

File line 2
  Comment: 'Comment with a comma, and stuff.'
...
  Colour: 'Violet'
  Name: 'Bill'
  Line: '5'