$str = 'Hulk hate classless system with means of manufacturing given to working class! Hulk crush puny Marxists!';
if ( $str =~ /Hulk hate (\w+)/ ) {
    $str = '';
    my $word = $1;
}