Return using the perl way