Select Code to Download

#!perl
use strict;
...
  my $i = nrc_iter(@$_);
  print "  @$_\n" while $_ = $i->();
}