Select Code to Download

  $a =~ s/\x0d\x0a/' + Chr(13) + Chr(10) + '/;

  $a =~ s/\r\n/' + Chr(13) + Chr(10) + '/;

  $a =~ s/\r\n/' + Chr(13) + Chr(10) + '/g;