use Data::Dumper; warn Dumper($var);