@temp = map {my $tmp; ($tmp = $_) =~ s/^The //; $tmp} @indata