Select Code to Download

    $_ =~ s/(.+?\@)(.+?\.)(.+?)/$1something.$3/g;

    $_ =~ s/(?<=\@).+?(?=\.)/something/g;