use strict;
use warnings;
use utf8;

while(<DATA>)
{
    unless(/\.wt\./)
    {
        print "matches : $_\n";
    }
}

__DATA__
https://www.abc.com.wi.pr.com/
https://www.abc.com/
https://www.def.com.wi.pr.com/
https://www.wt.com.wi.pr.com/