After reducing the $max value down to 32766 to keep the RE happy it fails to find 'This program cannot be run in DOS mode' which it certainly should:

C:\>strings.pl myscript.exe
RES>
.text
`.rdata
@.data
5@e@

C:\>type strings.pl
my( $min, $max ) = ( 4, 32766 );
local( $/ ) = \(32*1024);
my $prev = '';
while( <> ) {
    $prev .= $_;
    while( $prev =~ /([\n\t -~]{$min,$max})\0/g ) {
        print "$1\n";
    }
    $prev =~ s/.*\0//s;
}
[download]

The bug (on win32 and Mac) is not allowing \r. BTW it took me about 5 minutes to realise what ' -~' was doing :-) I have written it longhand octol for slow learners like me. There is a CRLF before the terminating $ in the assembly.

C:\>strings.pl myscript.exe
!This program cannot be run in DOS mode.
$
RES>
.text
`.rdata
@.data
5@e@

C:\>type strings.pl
my( $min, $max ) = ( 4, 32766 );
local( $/ ) = \(32*1024);
my $prev = '';
while( <> ) {
    $prev .= $_;
    while( $prev =~ /([\t\r\n\040-\176]{$min,$max})\0/g ) {
        print "$1\n";
    }
    $prev =~ s/.*\0//s;
}

C:\>
[download]