Help for this page
$first = shift@ARGV; $second = shift@ARGV; ... print OUT ($1) unless (exists($naccess{$1})); } close (IN);
1 59 49 0.0 0 100.0 0.0 1 60 50 0.0 0 100.0 0.0
112 104.35 141.94 115 22.34 29.13