my $arrayref = [];
print "$arrayref\n";
print 0+$arrayref, "\n";