- or download this
#!/usr/bin/perl -w
use strict;
...
} @rows,
);
print $t;
- or download this
ID Name Source Type Assigment
1 ... ... ... ...
2 ... NA Emp Active
EU Ex-emp Inactive
3 ... ... ... ...
- or download this
$t->load( map { MapCarU {[@_]} map [split $/], @$_ } @rows );