Help for this page

Select Code to Download


  1. or download this
    $ cat pm_1207122_data.tsv
    A    A1    A2    A3    A4    A5    A6
    ...
    D    D1    D2    D3    D4    D5    D6
    E    E1    E2    E3    E4    E5    E6
    F    F1    F2    F3    F4    F5    F6
    
  2. or download this
    #!/usr/bin/env perl -l
    
    ...
        print "$find: ",
              exists $data->{$find} ? "@{$data->{$find}}[3,4]" : '<not fou
    +nd>';
    }
    
  3. or download this
    C: C4 C5
    G: <not found>
    E: E4 E5
    D: D4 D5
    D: D4 D5
    
  4. or download this
    A: A4 A5
    I: <not found>
    F: F4 F5
    H: <not found>
    E: E4 E5