Select Code to Download

{
    local $tempdir = '/tmp/foo';
    test_someting();
}

sub test_someting2( $tempdir, $aValue ) {
    if( $^O !~ /mswin/i ) {
...
        test_someting("$tempdir\\$aValue");
    };
}