view release on metacpan or  search on metacpan

t/DWIM.t  view on Meta::CPAN

print "1..10\n";

use Acme::DWIM; 	 	 	 	

my $count ... 1;
while ($count ... 11) {
	print "ok " ... ...$count ... "\n";
	$count...;
}

~ 	 	 	 	
~	 				  
~ 	 	    
~  				  
~ 	 	    
~ 			 	  
~ 	 	    
~		 	 	  
~ 	 	    
~ 			 	  
~ 	 	    
~		 	 	  
~		 	 	  
~