Skip to content
Find file
Fetching contributors…
Cannot retrieve contributors at this time
22 lines (15 sloc) 375 Bytes
use v6;
use Test;
use Text::CSV;
sub ok_becomes($input, $output, $description = '') {
is_deeply Text::CSV.read($input), $output, $description;
}
ok_becomes q[[[foo
bar
baz]]], [['foo'], ['bar'], ['baz']], 'three lines, no commas';
ok_becomes q[[[foo
bar
baz
]]], [['foo'], ['bar'], ['baz']], 'three lines, no commas, final empty line';
done_testing;
# vim:ft=perl6
Something went wrong with that request. Please try again.