Hello eddiemo,

You have forgotten to close parenthesis when you store your attributes (see below):

$ perl test.pl 
syntax error at test.pl line 17, near "get_date;"
Execution of test.pl aborted due to compilation errors.
[download]

After adding the parenthesis it works :) (see below):

$ perl test.pl 
Hello World!

     START ing script test.pl
SA - YEAR: 2019, MONTH: 5, DAY: 77

         END ing script test.pl
[download]

Sample of code for replication after modifications:

#!/usr/bin/perl
use strict;
use warnings;

my $year = 2019;
my $month = 5;
my $day = 19;

print "Hello World!\n";
print"\n\t START ing script $0\n";

sub get_date {
my ($y, $m, $d) = (9999, 888, 77);
return($y, $m, $d);
} # end get_date

($year, $month, $day) = get_date;
print "SA - YEAR: $year, MONTH: $month, DAY: $day\n";
print "\n\t\t END ing script $0\n";
[download]

I assume the goal is to pass some parameters to the function. I would recommend to start reading here perlsub. If you have any questions do not hesitate to ask again.

Hope this helps, BR.