Select Code to Download

use strict;
use Data::Dumper;
...

# display
print( Data::Dumper::Dumper( \@statuscount ) );

$VAR1 = [
          'Admitted',
...
          'Applied',
          '2'
        ];