Make install tests more platform independent
Leon Timmermans
10 years ago
0 | 0 |
Revision history for Module::Build::Tiny
|
1 | 1 |
|
2 | 2 |
{{$NEXT}}
|
|
3 |
Make install tests more platform independent
|
3 | 4 |
|
4 | 5 |
0.033 2014-01-21 03:27:32CET+0100 Europe/Amsterdam
|
5 | 6 |
Require Getopt::Long 2.36
|
123 | 123 |
{
|
124 | 124 |
ok( open2(my($in, $out), $^X, Build => 'install'), 'Could run Build install' );
|
125 | 125 |
my $output = do { local $/; <$in> };
|
126 | |
like($output, qr[Installing install/lib/perl5/$Config{archname}/Foo/Bar\.pm], 'Build install output looks correctly');
|
|
126 |
my $filename = quotemeta catfile(qw/install lib perl5/, $Config{archname}, qw/Foo Bar.pm/);
|
|
127 |
like($output, qr/Installing $filename/, 'Build install output looks correctly');
|
127 | 128 |
|
128 | 129 |
ok( -f "install/lib/perl5/$Config{archname}/Foo/Bar.pm", 'Module is installed');
|
129 | 130 |
ok( -f 'install/bin/simple', 'Script is installed');
|