#!/usr/local/bin/perl -w            ;# 14:44 07May01 permute.pl