You CAN get it with a glitch in GSC
It involves using a Sneasel with the move BeatUp and doing a messed up cloning. I personally haven't tried it, but I did experiment with messing up cloning in my Crystal and got some random things like Persian and Nidorino out of it, holding weird items like HM10 and Moon Stone. If interested, I'll find the link detailing how to do it
It messed up my Pokedex giving me like half of the pokemon caught (It was a new game, all I actually had was Cynda/Rattata/Pidgey), but it's all in good fun