my $x = $yearlyamount / 52;
$x =~ s/(\.\d\d)\d*$/$1/;