system( $yourConfiguredEditor, $fileName )

##</code><code>##

    if(  $^O =~ /Win32/  ) {
        system( qq("$yourEditor" "$fileName") );
    } els...

##</code><code>##

    if(  $^O =~ /Win32/  ) {
        system( $yourEditor, qq("$fileName") );
    } els...