Select Code to Download

s/\s//;   # remove all whitespace from $_
if($_ eq "l") { entry_list(); }
elsif($_ eq "a") {  addentry();}   #etc

subroutine;          # doesn't pass strict.
&subroutine;         # passes @_ as argument list

&subroutine();       # looks weird, passes arguments in ()
subroutine();        # generally preferred method