summaryrefslogtreecommitdiffstats
path: root/debian/create_preinst
blob: 1f30072ad292f6eeac8404e39ca2a6947056e768 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
#!/usr/bin/perl
#
# This script embeds a base64 encoded tarball into apache2.preinst.
# See #794933

use strict;
use warnings;
use autodie;


sub readfile
{
	my $fname = shift;
	local $/;
	open(my $fd, "<", $fname);
	my $content = <$fd>;
	return $content;
}

sub writefile
{
	my $fname = shift;
	my $content = shift;
	open(my $fd, ">", $fname);
	print $fd $content;
}

my $preinst = readfile("debian/apache2.preinst.in");
my $embed = readfile("debian/fixup_conffiles.b64");

$preinst =~ s/XXX_FIXUP_CONFFILES_BASE64_XXX/$embed/;
writefile("debian/apache2.preinst", $preinst);