sub bar{ my $truth = 'beauty'; if ($truth){ return do { #do block will return 1 if ($truth) { 1; } 1; }; } }