The $s in the sub is a closure to the last declaration of $s before the sub was compiled.

So when you call it at runtime before it was initialized it's of course undefined.

(my does declaration at compile time and initialization at run time)

Sorry if I don't elaborate more on "broken" code, just don't do this ... there is a reason why you get warnings! :)