#! perl

use strict;

# ... King Richard's logic would have been completely different:

sub horse();

for (my @horse) { 
  &horse(); 
  &horse();
  my $kingdom;
}


# If only someone had only told Julius Caesar...
my $ides = "";
open(MARCH) || die;
warn $ides, eof(MARCH);