Select Code to Download

Welcome to the Perl Tutor!

Special commands are:
...
@baz = (1, 2, 3, 4)
sub foo { ... }
> quit

#!/usr/bin/perl -w
use strict;
use Term::ReadLine;
...
  print "No variables are currently defined.\n" unless $varcount;
  package main;
}