my $aoa = csv (in => \$line);