package Filter::LineTrace;
use Filter::Simple;

FILTER_ONLY
	code => sub {
		s[;\s*$][;print STDERR __LINE__;]mg;
	},
;
# Replace the next line with 1;
print STDERR 'Filter::LineTrace loaded';