Subroutine Perl

  1. Home
  2. Perl
  3. Subroutine
  4. Return a reference from a sub
#!/usr/bin/perl
use warnings;
use strict;
sub now { return \scalar(localtime) };
print "The time is ${&now}\n";