sub values{
    my @X = ("something","something");
    return(@X);
}

##</code><code>##

my @vals = &values();
&guest(@vals);  ## i assume it uses this ? maybe not
&giest2( @vals, 'test');

##</code><code>##

$ perl -e 'do() || ! do() ;'
Undefined subroutine &main::try