#!/usr/bin/perl
# SPDX-License-Identifier: 0BSD
print "#include \"eperl.h\"\n";
print "const uint8_t ${ARGV[0]}[] = {\n\t";
while(read(STDIN, $_, 1) == 1) {
	print ord.",";
}
print "\n};\n";
print "const size_t ${ARGV[0]}_size = ".(tell STDIN).";\n";
