Alien-Build
view release on metacpan or search on metacpan
corpus/alien_build_plugin_fetch_wget/record/old.json view on Meta::CPAN
{"-k --content-disposition -S http://localhost/corpus/alien_build_plugin_fetch_wget/dir/foo-1.01.tar":{"stderr":"--2021-05-12 00:10:35-- http://localhost/corpus/alien_build_plugin_fetch_wget/dir/foo-1.01.tar\nResolving localhost (localhost)... ::1, ...
corpus/alien_build_plugin_fetch_wget/record/old.yml view on Meta::CPAN
html_test.html: "<html><head><title>Hello World</title></head><body><p>Hello World</p></body></html>\n"
stderr: |
--2021-05-12 00:10:35-- http://localhost/corpus/alien_build_plugin_fetch_wget/dir/html_test.html
Resolving localhost (localhost)... ::1, 127.0.0.1
Connecting to localhost (localhost)|::1|:42643... failed: Connection refused.
Connecting to localhost (localhost)|127.0.0.1|:42643... connected.
HTTP request sent, awaiting response...
HTTP/1.0 200 OK
Date: Wed, 12 May 2021 06:10:35 GMT
Server: HTTP::Server::PSGI
Content-Type: text/html; charset=utf-8
Content-Length: 84
Last-Modified: Wed, 12 May 2021 04:39:27 GMT
Length: 84 [text/html]
Saving to: ‘html_test.html’
0K 100% 9.79M=0s
2021-05-12 00:10:35 (9.79 MB/s) - ‘html_test.html’ saved [84/84]
Converting links in html_test.html... nothing to do.
corpus/dir/http.html view on Meta::CPAN
<html><head>
<title>Index of /corpus/dist/</title>
<meta http-equiv="content-type" content="text/html; charset=utf-8" />
<style type='text/css'>
table { width:100%%; }
.name { text-align:left; }
.size, .mtime { text-align:right; }
.type { width:11em; }
.mtime { width:15em; }
</style>
</head><body>
<h1>Index of /corpus/dist/</h1>
<hr />
corpus/dir/http_rel.html view on Meta::CPAN
<html><head>
<title>Index of /foo/bar/</title>
<meta http-equiv="content-type" content="text/html; charset=utf-8" />
<style type='text/css'>
table { width:100%%; }
.name { text-align:left; }
.size, .mtime { text-align:right; }
.type { width:11em; }
.mtime { width:15em; }
</style>
</head><body>
<h1>Index of /foo/bar/</h1>
<hr />
[RemovePrereqs]
; core pragma
remove = strict
remove = warnings
remove = lib
remove = constant
remove = overload
remove = if
remove = utf8
; core modules
remove = Exporter
remove = Data::Dumper
remove = Carp
remove = File::Temp
remove = Getopt::Long
remove = IO::Socket::INET
remove = File::Basename
remove = File::Copy
lib/Test/Alien/Build.pm view on Meta::CPAN
else
{
return $root;
}
};
};
if($args{source})
{
my $file = $get_temp_root->()->child('alienfile');
$file->spew_utf8($args{source});
$args{filename} = $file->stringify;
}
else
{
unless(defined $args{filename})
{
croak "You must specify at least one of filename or source";
}
$args{filename} = path($args{filename})->absolute->stringify;
}
lib/Test/Alien/Build.pm view on Meta::CPAN
croak "passed in undef rc" unless defined $code;
croak "looks like you have already defined a rc.pl file" if $ENV{ALIEN_BUILD_RC} ne '-';
my(undef, $filename, $line) = caller;
my $code2 = "use strict; use warnings;\n" .
'# line ' . $line . ' "' . path($filename)->absolute . "\n$code";
$alien_rc_root ||= Alien::Build::Temp->newdir;
my $rc = path($alien_rc_root)->child('rc.pl');
$rc->spew_utf8($code2);
$ENV{ALIEN_BUILD_RC} = "$rc";
return 1;
}
sub alien_subtest
{
my($name, $code, @args) = @_;
_alienfile_clear;
t/alien_build_plugin_core_gather.t view on Meta::CPAN
use 5.008004;
use Test2::V0 -no_srand => 1;
use utf8;
use Test::Alien::Build;
use Alien::Build::Plugin::Core::Gather;
use Capture::Tiny qw( capture_merged );
use Alien::Build::Util qw( _dump _destdir_prefix );
use Path::Tiny qw( path );
use File::Temp qw( tempdir );
subtest 'destdir filter' => sub {
my $build = alienfile q{
t/alien_build_plugin_core_gather.t view on Meta::CPAN
'has arch and arch-indy pkg-config paths',
);
};
subtest '_alien/alien.json should be okay with unicode' => sub {
my $build = alienfile q{
use alienfile;
use utf8;
probe sub { 'system' };
gather sub {
my($build) = @_;
$build->runtime_prop->{'é¾'} = 'ç«';
};
};
alien_build_ok;
is(
$build->runtime_prop,
( run in 0.290 second using v1.01-cache-2.11-cpan-4d50c553e7e )