Help for this page

Select Code to Download

Select or download this

#!/usr/local/bin/perl

...
foreach my $row ($te->rows) {
  print Dumper($row);
}

Select or download this

$VAR1 = [
  'Carnival Freedom',
...
  'Azamara Journey',
  "S 35\x{b0}06', W 056\x{b0}48'"
];