sub MY{ my $K = __SUB__; }  # Why is this giving me an error?