Help for this page

Select Code to Download


  1. or download this
    my $dates = "20070410, 20070415, 20070417, 20070418";
    my $quan  = "10, 20, 15, 42";
    my $table = new Data::Table( [ [$dates], [$quan] ], [ 'Dates', 'Values
    +' ], 1 );
    
  2. or download this
    my @dates = (20070410, 20070415, 20070417, 20070418);
    my @quan  = (10, 20, 15, 42);
    my $table = new Data::Table( [ [@dates], [@quan] ], [ 'Dates', 'Values
    +' ], 1 );