Select Code to Download

I start at 0 in both three-coloured and seven-coloured space.
The environment in the respective spaces are [0,1,2] and [0,1,2,3,4,5,
+6].
I am now at 1 in 3-space and 0 in 7-space.
...
  STEP7 4 0
  SELF
  SELVES

#!/usr/bin/perl -w
# (c) Declan Malone 2008
...
print "The environment in 7-space is (", (join ",", @$sevens), ")\n";
print "My tape reads:\n  ", (join "\n  ", @{$h->{TRAIL}->()}), "\n";