#!/usr/bin/perl
use strict;
use Data::Dumper;
$|=1;   #makes the macro produce all results at once, not in spurts

my $filename =SHIFT; #Instead of RAH99.html