chomp($line = glob 'IN' );