A simple card game programmed in Object Oriented Perl