#!/usr/local/bin/perl -w

my $MV="/bin/mv";
$hub=$ARGV[0];

system("$MV $hub-day.gif hdf-$hub-day.gif");
system("$MV $hub-week.gif hdf-$hub-week.gif");
system("$MV $hub-month.gif hdf-$hub-month.gif");
system("$MV $hub-year.gif hdf-$hub-year.gif");
system("$MV $hub.html hdf-$hub.html");
system("$MV $hub.log hdf-$hub.log");
system("$MV $hub.old hdf-$hub.old");
