A card game of Bungee in Perl.