C:\WINDOWS\デスクトップ>perl -lane "$n=1; print \"$F[$n-$#F-1] $F[$n]\"" b.dat 2.11520385742188 2.11520385742188 3.05591735839844 3.05591735839844 4.1234130859375 4.1234130859375 5.36311340332031 5.36311340332031 6.1601806640625 6.1601806640625 7.09348449707031 7.09348449707031 8.60143432617187 8.60143432617187 9.57536010742187 9.57536010742187 10.8480926513672 10.8480926513672 11.7131164550781 11.7131164550781 12.6625122070312 12.6625122070312 14.0559478759766 14.0559478759766 14.6789276123047 14.6789276123047 16.3958953857422 16.3958953857422 16.2184478759766 16.2184478759766 17.0652526855469 17.0652526855469 19.6688018798828 19.6688018798828 19.8661254882813 19.8661254882813 20.2305358886719 20.2305358886719 22.4033935546875 22.4033935546875 C:\WINDOWS\デスクトップ>