my $_accountBalance = $_db->{acct_bal}; print qq~Current Account Balance: ~ . sprintf('$%.2f', $_accountBalance) . qq~! As of $_date~;