filename = without012.csv pred = -0.0105 0.0645 0.1989 0.0151 0.0289 0.0400 0.5313 filename = without013.csv pred = -0.0080 0.0663 0.1911 0.0075 0.0288 0.0302 0.5234 filename = without014.csv pred = -0.0023 0.0595 0.2582 0.0323 0.0285 0.0578 0.5807 #### -0.0023 0.0595 0.2582 0.0323 0.0285 0.0578 0.5807 #### filename = without014.csv pred = -0.0023 0.0595 0.2582 0.0323 0.0285 0.0578 0.5807 #### #!/usr/bin/perl @file = <>; for($i = 0; $i < @file; $i+4) { print "$file[$i]"; }