www2.0/cgi-bin/guest_mm.cgi
2022-01-11 20:59:27 -05:00

15 lines
345 B
Perl
Executable file

#!/usr/bin/env perl
# Guestbook CGI Program
# Daniel Bowling <swaggboi@slackware.uk>
# Sep 2020
use strict;
use warnings;
use utf8;
use open qw{:std :utf8}; # Fix "Wide character in print" warning
use CGI qw{-utf8}; # Needed to parse unicode params
use CGI::Carp qw{fatalsToBrowser};
print CGI->redirect('https://guestbook.swagg.net');