#!/usr/bin/perl
use strict;
use Data::Show;
use LWP::Simple;


for(my $tloop = 0; $tloop < 50; $tloop++){
	my $content = get("http://www.dmadelivers.com/test-apache-404");
	
	if(!defined $content){
		warn "Fail: $tloop";
	}else{
		show $content;
	}

}






1;