my ($args = <<'ARGS')=~s/^\s+//gm;
arg1
ARGS

my ($input = <<'INPUT')=~s/^\s+//gm;
good1
good2
bad1
good3
INPUT

my ($expected_output = <<'OUTPUT')=~s/^\s+//gm;
good1
good2
good3
OUTPUT