if( $^O =~ /^MSWin/ ) { $comp= $b gt $a; } else { $comp= $a lt $b; } #### if ($^O =~ /^MSWin/) { $comp= $a gt $b; } else { $comp= $b lt $a; }