Select Code to Download

sub score {
  $_=pop;                                                       #  7
...
}
#                                                                ___
#                                                                 96

 
sub fullscore {
  $_=join'',@_;                                                 # 13
...
}
#                                                                ___
#                                                                123