my @parts = split(/\t/, $data);

    my $url = $parts[0];
    $mech->get( "$url" );