dbllf

   1 #!/usr/bin/env perl
   2
   3 #==================================================
   4 # dbllf
   5 # File ID: 3c283716-5d38-11df-b62c-90e6ba3022ac
   6 # Dobler LF så enkelte ting blir mer oversiktlig
   7 #==================================================
   8
   9 use strict;
  10 use warnings;
  11
  12 $| = 1;
  13
  14 while (<>) {
  15         s/\n/\n\n/g;
  16         print;
  17 }
  18
  19 __END__
  20
  21 # End of file dbllf