#!/usr/bin/perl

use warnings;
use strict;

my $url = "(removed)";

use CGI::Carp qw(fatalsToBrowser);

use CGI qw/:standard/;

use lib "/home/name/public_html/lib/";
    use WWW::Mechanize;
    my $mech = WWW::Mechanize->new();

    $mech->get( $url );


print header, start_html();

print $mech->links;