Help for this page

Select Code to Download


  1. or download this
    #! perl
    use strict;
    ...
    20 30 40
    60 70 80
    90 100 49
    
  2. or download this
    23:50 >perl 548_SoPW.pl
    ([20, 30, 40], [60, 70, 80], [90, 100, 49])
    element at col 3, row 2 is 80
    
    23:50 >
    
  3. or download this
    my   @matrix;
    push @matrix, [ split ] while <DATA>;