Select Code to Download

!/perl
use strict;
...
# 372

dd \%main;

{
  117 => 117,
...
  678 => 123,
  789 => 123,
}