#!/usr/bin/perl -w

use GetLinks;

my @links = getLinks("http://www.perl.com/");
print join("\n", @links), "\n";

