perl -e" BEGIN{close STDERR};use re qw[debug]; 1 =~ 1 "