Select Code to Download

use Tie::RegexpHash;
my $text = <<TEXT;
...
    I'm so touched, I hope you go to Heaven.
    You have lightened my life. Kiss you.
    I love you forever, you godbless lover