Select Code to Download

my $content = $response->content();
my @content = "$content";

my $introduction = grep (/Game Introduction - Marvel: Avengers Allianc
+e/, @content);
print "$introduction";

my $content = $response->content();
my @content;
...

my $introduction = grep( /Game Introduction - Marvel: Avengers Allianc
+e/, $content[ 0 ] );
print $introduction;

my $content = $response->content();

my $introduction = grep( /Game Introduction - Marvel: Avengers Allianc
+e/, $content );
print $introduction;

my $content = $response->content();

my $introduction = $content =~ /Game Introduction - Marvel: Avengers A
+lliance/;
print $introduction;

my @introduction = grep /Game Introduction - Marvel: Avengers Alliance
+/, split /^/, $response->content();

print @introduction;