#!/usr/local/bin/perl
@sigz = ("sig1.html","sig2.html","sig3.html","sig4.html","sig5.html","sig6.html","sig7.html","sig8.html","sig9.html");
$randa = int(rand(@sigz));
$rand = int(rand(@songs));
$url = $songs[$rand];
$embed = $sigz[$randa];
print "Content-Type: text/html\n\n";
print <