First pass at adding key files

site/slowtwitch.com/cgi-bin/articles/admin/bin/test.cgi

@@ -0,0 +1,32 @@
+#!/usr/local/bin/perl
+# ==================================================================
+# Gossamer Links - enhanced directory management system
+#
+#   Website  : http://gossamer-threads.com/
+#   Support  : http://gossamer-threads.com/scripts/support/
+#   CVS Info : 087,071,086,086,085      
+#   Revision : $Id: admin.cgi,v 1.94 2009/05/12 01:09:13 brewt Exp $
+#
+# Copyright (c) 2005 Gossamer Threads Inc.  All Rights Reserved.
+# Redistribution in part or in whole strictly prohibited. Please
+# see LICENSE file for full details.
+# ==================================================================
+
+use strict;
+use lib '/var/home/slowtwitch/slowtwitch.com/cgi-bin/articles/admin';
+use Links qw/:objects/;
+
+$| = 1;
+local $SIG{__DIE__} = \&Links::fatal;
+Links::init('/var/home/slowtwitch/slowtwitch.com/cgi-bin/articles/admin');
+Links::init_admin();
+
+use Plugins::MostPopular;
+use Links::SiteHTML;
+
+my $foo = Plugins::MostPopular::generate_popular_links();
+
+use Data::Dumper;
+foreach (@{$foo->{MostPopularLinks}}) {
+    print $_->{Title}, "\n";
+}