zatlas1 has asked for the wisdom of the Perl Monks concerning the following question:

The \c pattern is defined on ASCII environments this way: "control-x", where x is any character The precise effect of "\cx" is as follows: if "x" is a lower case letter, it is converted to upper case. Then bit 6 of the character (hex 40) is inverted. Thus "\cz" becomes hex 1A, but "\c{" becomes hex 3B, while "\c;" becomes hex 7B. How should this behave on EBCDIC platforms, like Perl-mvs Thanks ZA

Replies are listed 'Best First'.
Re: backslash c (\c) on EBCDIC
by kcott (Archbishop) on Jun 01, 2015 at 19:41 UTC

    G'day zatlas1,

    Welcome to the Monastery.

    [Disclaimer: I'm not a user of EBCDIC.]

    It looks like you may find your answer in perlebcdic.

    The "OPERATOR DIFFERENCES" section of that document has a table of '\cX' values.

    -- Ken

      Thank you for pointing me ZA