Select Code to Download

my @line = grep { length > 0 } split ( /\S+/, $_ );
print "$line[0]\t$line[1]\n";

    STATUS        mandatory

STATUS    mandatory