$ perl -e '
    print
        qq{line1\n},
        qq{line2\n},
        ($ARGV[0] == 20 ? qq{line3\n} : ""),
        qq{line4\n};
' 19
line1
line2
line4