|| confess "Account overdrawn";
$self->balance($current_balance - $amount);
}
-
+
+ __PACKAGE__->meta->make_immutable(debug => 0);
+}{
package CheckingAccount;
use Moose;
$self->deposit($overdraft_amount);
}
};
+
+ __PACKAGE__->meta->make_immutable(debug => 0);
}
my $savings_account = BankAccount->new(balance => 250);