Select Code to Download

  my $now = sub (return scalar(localtime time)); # Creates a subroutin
+e reference

  print $now->(), .... # Makes a  call to the sub, each time $now->() 
+is used