Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

28 lines (20 sloc) 0.448 kB
#!/usr/bin/perl
# Copyright (C) 2008, The Perl Foundation.
#
use strict;
use warnings;
my @files = @ARGV;
print <<"END_SETTING";
#! nqp
# This file automatically generated by $0 in the nqp-rx project.
END_SETTING
my %classnames;
foreach my $file (@files) {
print "# From $file\n\n";
open(my $fh, "<", $file) or die $!;
local $/;
my $x = <$fh>;
close $fh;
print $x;
}
print "\n# vim: set ft=perl6 nomodifiable :\n";
Jump to Line
Something went wrong with that request. Please try again.