Help for this page

Select Code to Download


  1. or download this
    $ perl -MText::CSV -e 'print "$Text::CSV::VERSION\n"'
1.06
$ eval $(perl -I$HOME/perl5/lib/perl5 -Mlocal::lib)
$ perl -MText::CSV -e 'print "$Text::CSV::VERSION\n"'
1.20
  2. or download this
     EHR - getline_hr () called before column_names () at myscript.pl line
+ 676
  3. or download this
    # declare column names for getline_hr
$csv->column_names($csv->getline($csv_fh));
...
    {
    push(@buttons, $row) unless ($. == 1);
    }