Help for this page

Select Code to Download


  1. or download this
    @array = unpack('A24A24A24', $line);
    
  2. or download this
    @names = unpack('A24A24A24', $line);
    @address1 = unpack('A24A24A24', $nextline);
    for (0..2) { $hash{$names[$_]}{address1} = $address1[$_]; }