use MyTest; print "Once-lexical variable holds $lexvar\n";