my ($fin, $dt, $vard );