Not sure if it works, no time to test but replace

pack();
[download]

with

pack(-side=> 'right');
[download]

update: kevin_i_orourke found the real solution. Ignore my post, but don't steal it!

--
package Lizard::King;
sub can { do { 'anything'} };
[download]