Help for this page

Select Code to Download


  1. or download this
    while (my $row2 = <$fh2>) {
            chomp $row;
            my @records2 = split(';', $row2);
    
    my @items = ($records2[3], $records2[4], $records2[5], $records2[7], $
    +records2[8]);
    
  2. or download this
    $colli_amount++;
    
    if ($total_colli_amount == $colli_amount) {}