Select Code to Download

    print unindent( <<"    END" );
        Usage: $0 [flags] [args]
        Gropples the snarflog.
...
                   wide  Minimize alphabet size.
        Do not use on UTF8 files.
    END

sub unindent { s/^\s*\S//gm }

    print unindent( <<"    END" );
...
        .           wide  Minimize alphabet size.
        .Do not use on UTF8 files.
    END