#!/usr/local/bin/perl -w use strict; for$-(1..9){printf'%3d',$_*$-for 1..9;print$/}
-w and strict optional, of course.
-w
strict
Log in or register to write something here or to contact authors.
Sign up
Need help? accounthelp@everything2.com