# perlmonk levels # the xp xml ticker doesn't return this, so we'll have to hard code it my %perlmonk_levels = ( 1 => 0, 2 => 20, 3 => 50, 4 => 90, 5 => 150, 6 => 250, 7 => 400, 8 => 600, 9 => 900, 10 => 1300, 11 => 1800, 12 => 2400, 13 => 3000, 14 => 4000, 15 => 5400, 16 => 7000, 17 => 9000, 18 => 12000, 19 => 16000, 20 => 22000, 21 => 30000, 22 => 40000, 23 => 50000, 24 => 60000, 25 => 70000, 26 => 80000, 27 => 90000, 28 => 100000);