my $aj      = Horse->new(name => "Applejack");
my $metres  = $aj->height( in => "metres" );
my $inches  = $aj->height( in => "inches" );
my $hands   = $aj->height( in => "hands" );
my $silly   = $aj->height( in => "lightyears" );