Searched refs:IS_WIN32 (Results 1 – 13 of 13) sorted by relevance
43 *IS_WIN32 = ($^O eq 'MSWin32') ? sub() { 1 } : sub() { 0 };64 return 0 unless IS_WIN32 || $^O eq 'NetWare';124 if (IS_WIN32 && $] < 5.020002) {207 if (IS_WIN32) {255 unless(IS_WIN32) {
8 use constant IS_WIN32 => $^O eq 'MSWin32' ? 1 : 0; constant10 use constant IS_WIN98 => (IS_WIN32 and !Win32::IsWinNT()) ? 1 : 0;13 use constant QUOTE => do { IS_WIN32 ? q["] : q['] };26 $USE_IPC_RUN = IS_WIN32 && !IS_WIN98;39 require Win32 if IS_WIN32;41 $CAN_USE_RUN_FORKED = $@ || !IS_VMS && !IS_WIN32;246 ( IS_WIN32 ? File::Spec->curdir : () )249 … my $abs = File::Spec->catfile( IS_WIN32 ? Win32::GetShortPathName( $dir ) : $dir, $command);1350 if( !IS_WIN32 and $USE_IPC_RUN and $self->can_use_ipc_run( 1 ) ) {1368 my $method = IS_WIN32 ? '_open3_run_win32' : '_open3_run';[all …]
11 my $IS_WIN32 = ( $^O =~ /^(MS)?Win32$/ );95 return unless $Config{d_fork} || $IS_WIN32;150 if ($IS_WIN32) {343 $status = 0 if $IS_WIN32 && $status == -1;
6 use constant IS_WIN32 => ( $^O =~ /^(MS)?Win32$/ ); constant19 if (IS_WIN32) {
31 IS_WIN3261 IS_WIN32();63 is(IS_WIN32(), ($^O eq 'MSWin32') ? 1 : 0, "IS_WIN32 is correct ($^O)");
11 use constant IS_WIN32 => $^O =~ /^(MS)?Win32$/; constant13 use constant SELECT_OK => !( IS_VMS || IS_WIN32 );
7 use constant IS_WIN32 => ( $^O =~ /^(MS)?Win32$/ ); constant329 return qq["$^X"] if IS_WIN32 && ( $^X =~ /[^\w\.\/\\]/ );
33 my $IS_WIN32 = ($^O =~ /Win32/);519 $format =~ s/%e/%d/ if $IS_WIN32;546 $format =~ s/%T/%H:%M:%S/ if $IS_WIN32;551 $format =~ s/%u/%w/ if $IS_WIN32;557 $format =~ s/%V/$week/ if $IS_WIN32;
19 use constant IS_WIN32 => ( $^O =~ /^(MS)?Win32$/ ); constant20 use constant NEED_GLOB => IS_WIN32;
20 my $IS_WIN32 = ( $^O =~ /^(MS)?Win32$/ );125 skip => $IS_WIN32 ? 0 : 1,
8 use constant IS_WIN32 => ( $^O =~ /^(MS)?Win32$/ ); constant266 elsif (IS_WIN32) {
43 use constant IS_WIN32 => ( $^O =~ /^(MS)?Win32$/ ); constant45 use constant IS_UNIXY => !( IS_VMS || IS_WIN32 );
6 IS_WIN32 => $^O eq 'MSWin32',152 if (IS_WIN32) {