Help for this page

Select Code to Download


  1. or download this
    
#!/usr/bin/perl -w
...
        print "Deposited Amount: $d\n";
        #&deposit($mon);
                        }
  2. or download this
    
package Checking;
...
                }
1;
  3. or download this
    
./myATM.pl 
...
Enter the amount you want to deposit:23
Deposited Amount: 1