if ( $parent eq "http:/" or $parent eq $key ) {

##</code><code>##

  if ( $parent =~ /^http:/ or $parent eq $key ) {