my $sh = \*SHAKESPEARE;