use strict;
use Data::Dumper;

print Dumper get_array();
print Dumper get_array_ref();

print Dumper scalar get_something();
print Dumper get_something();

sub get_array {
   return ('a'..'d');
}

sub get_array_ref {
   return [('a'..'d')];
}

sub get_something {
   return wantarray ? ('a'..'d') : 'scalar';
}