},
{
name => 'csh',
+ opt => '-f',
},
{
name => 'cmd',
- opt => '/c',
+ opt => '/D /C',
ext => 'bat',
perl => qq{@"$^X"},
},
{
name => 'powershell',
- opt => '-ExecutionPolicy Unrestricted',
+ opt => '-NoProfile -ExecutionPolicy Unrestricted',
ext => 'ps1',
perl => qq{& '$^X'},
},
local $ENV{SHELL} = $info->{shell};
- my $file = File::Temp->new('ll-test-script-XXXXX',
- TMPDIR => 1,
- SUFFIX => '.'.$info->{ext},
+ my $file = File::Temp->new(
+ TEMPLATE => 'll-test-script-XXXXX',
+ TMPDIR => 1,
+ SUFFIX => '.'.$info->{ext},
);
$file->print(scalar `"$^X" $extra_lib -Mlocal::lib$option` . "\n");