Select Code to Download

  for( -5..@{$term} ) {

  for( -5..$term ) {

  print "\$term is @{$term}\n";

  print "\$term is $term\n";

  for( -5..undef ) {