Select Code to Download

#!/usr/bin/perl
use warnings;
...
    }
    print "$hash->{id}) $hash->{name}, $hash->{degree}\n";
}