### Evaluate perl record string to set $fields array reference
my $fields;
eval $_;
die if $@;