Select Code to Download

    eval "tr/$wrong1/$wrong2/$right1/$right2/"

#!/usr/bin/perl -w
use strict;
...
221,222,223,224,225,226,227,228,229,230,231,232,233,234,235,236,
237,238,239,240,241,242,243,244,245,246,247,248,249,250,251,252,
253,254