I would return an arrayref instead

sub func1
{
    # do some stuff

    return [$a, $b];
}
[download]

Then you can do stuff like

$ref = fuc1();

#or

@ref = @{func1()};
[download]

Hope that helps ;)