Help for this page
sub get_time { my ($string) = @_; ... /x; return ( \$sunrise, \$sunset ); }
sub get_time { my ($string) = @_; ... /x; return (\$sunrise, \$sunset); }