Help for this page

Select Code to Download


  1. or download this
    my $sv = "k";
my $sr = "l";
...
my @X = ([qw(a b c)], [qw(d e f)], [qw(h i j)]);

push @X,[qw($sv $sr $sj)];
  2. or download this
    a b c
d e f
h i j
$sv $sr $sj
  3. or download this
    a b c
d e f
h i j
k l m