Yeah. I tend to use it more often then I don't. It makes the code more readable if you explicitly state what you are returning. But if my routine only returns an error state or the return value is irrelevant then I don't use return. (Its not like Perl knows about void functions)

Since perl allways returns the value of the last expression, I usually just states $something if the sub's supposed to return some object.

For subs that prints stuff, I leave it to print() to decide.

If an error occurs, I use return 0 after setting an error value if possible.

Interesting... I do it the other way around!

my $txt2print = MySub('This text')
  or warn('MySub said 0');

print $txt2print;

sub MySub {
  my $txt = shift;

  $txt = { do something here } 
    or return(0);

  return($txt);
}
[download]

or is that what you where saying all along?

Sometimes I do this too. I guess it's just a matter of preference. Does anyone have a reason to use one or the other?

Usually, I don't use return for very small subs:

sub property { $_[0]->{property} }
[download]

I do use it for most larger subs.