Bareword "my_sort" not allowed while "strict subs" in use