Help for this page

Select Code to Download

Select or download this

%salary=(
     boss      => 1_000,
...
  sort { $salary{$a} <=> $salary{$b} }
  grep { $salary{$_} > 500 }
  keys %salary;