From eb0487ed502fec108cb70a2aac8535f435f99453 Mon Sep 17 00:00:00 2001 From: Holden Rohrer Date: Wed, 15 Jan 2020 16:31:16 -0500 Subject: removed extraneous lines in script --- minimun | 15 ++++----------- 1 file changed, 4 insertions(+), 11 deletions(-) diff --git a/minimun b/minimun index 92abe33..923426c 100755 --- a/minimun +++ b/minimun @@ -6,20 +6,13 @@ use IPC::Run qw(run); my ($in, $out); -$in .= "\\relax\n"; - -open(FORMAT, '<', 'format.tex'); -while (my $line = ){ - $in .= $line; -} -close(FORMAT); - -$in .= "bruh\n"; +$in .= "\\award\n"; $in .= "\\bye\n"; -run ['/usr/bin/pdftex'], '<', \$in, '>', \$out; +run ['/usr/bin/pdftex', 'format.tex'], '<', \$in, '>', \$out; print "Content-type: application/pdf\n\n"; -open(DOC, '<', 'texput.pdf'); +open(DOC, '<', 'format.pdf'); while (){ print; } +close(DOC); -- cgit