use Data::Dumper;
    print Dumper(\@status );