sub routine { return (); }
@x = routine();
print 0+@x;