view tools/find_space.pl @ 1599:d37b19f7e8bb

Move run/c/case_01 to nocompile.
author Christian Kamm <kamm incasoftware de>
date Tue, 09 Sep 2008 17:28:31 +0200
parents 0acada9a9731
children
line wrap: on
line source

#!/usr/bin/perl

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