Perl — Удаление пустых строк

Есть файл с текстом, проще привести кусок этого файла:
11    110  3-55 226  240    0.9  -0.5   -0.8  109.97    0.86   1.13 
 
11    110  3-55 226  240    0.9  -0.5   -0.8  109.97    0.86   1.13 12    120  5- 1 225  240    1.7  -0.9   -1.5  119.94    1.58   1.10 13    130  5-16 226  240    2.6  -1.3   -2.3  129.90    2.41   0.27 14    140  6-21 227  240    3.6  -1.8   -3.1  139.85    3.36   1.09 15    150  7- 7 230  241    4.8  -2.3   -4.2  149.78    4.46   0.84 

16    160  7-34 233  242    6.1  -2.9   -5.3  159.70    5.69   0.59 17    170  8-21 237  243    7.4  -3.3   -6.6  169.60    7.04   0.96 18    180  9- 9 239  245    8.9  -3.8   -8.1  179.49    8.54   0.86 19    190  9-55 240  246   10.6  -4.3   -9.7  189.35   10.18   0.78 20    200 10-52 242  248   12.4  -4.7  -11.4  199.18   11.97   1.02
 
21    210 11-38 244  249   14.3  -5.1  -13.3  208.99   13.92   0.86 22    220 12- 7 243  250   16.3  -5.6  -15.3  218.78   15.97   0.53 23    230 13-15 243  251   18.5  -6.0  -17.5  228.53   18.16   1.13 24    240 13-10 243  252   20.8  -6.5  -19.7  238.27   20.44   0.08 25    250 13-57 242  252   23.1  -7.1  -22.0  247.99   22.77   0.82
вобщем нужно поудалять пустые строки, чтоб столбцы не прерывались. Может я туплю, я в перле только начал писать. Подсобите ПЛЗ. В книжках толкового рецепта не нашёл.