view tools/find_space.pl @ 1613:70a23cb6a616

Fix incorrect run.t.throw_07_A/B tests
author Christian Kamm <kamm incasoftware de>
date Sun, 10 May 2009 12:10:34 +0200
parents 0acada9a9731
children
line wrap: on
line source

#!/usr/bin/perl

while (<>) {
	if ($_ =~ /[ \t]+$/){
		print "$ARGV\n";
	}
}