use Data::Dumper;  
    print Dumper($data);