$ perl ./csvtest.pl
$VAR1 = [
  '1'
];