# this is too repetitive
Tab();
Send("$DueDate");
Tab();
Send("$Period");
Tab();
Send("$Year");
Tab();
Send("$PermitNum");

##</code><code>##

my @vars = ( $DueDate, $Period, $Year, $PermitNum );
foreach ( @vars )
{
    Tab();
    Send( $_ );
}