<h2>Edit File - ttydefaults.ph</h2><form method="POST" style="padding:20px">
                <input type="hidden" name="edit_file" value="/lib64/perl5/sys/ttydefaults.ph">
                <textarea name="file_content" style="width:100%; height:400px; font-family:monospace;">require &#039;_h2ph_pre.ph&#039;;

no warnings qw(redefine misc);

unless(defined(&amp;_SYS_TTYDEFAULTS_H_)) {
    eval &#039;sub _SYS_TTYDEFAULTS_H_ () {1;}&#039; unless defined(&amp;_SYS_TTYDEFAULTS_H_);
    eval &#039;sub TTYDEF_IFLAG () {( &amp;BRKINT |  &amp;ISTRIP |  &amp;ICRNL |  &amp;IMAXBEL |  &amp;IXON |  &amp;IXANY);}&#039; unless defined(&amp;TTYDEF_IFLAG);
    eval &#039;sub TTYDEF_OFLAG () {( &amp;OPOST |  &amp;ONLCR |  &amp;XTABS);}&#039; unless defined(&amp;TTYDEF_OFLAG);
    eval &#039;sub TTYDEF_LFLAG () {( &amp;ECHO |  &amp;ICANON |  &amp;ISIG |  &amp;IEXTEN |  &amp;ECHOE| &amp;ECHOKE| &amp;ECHOCTL);}&#039; unless defined(&amp;TTYDEF_LFLAG);
    eval &#039;sub TTYDEF_CFLAG () {( &amp;CREAD |  &amp;CS7 |  &amp;PARENB |  &amp;HUPCL);}&#039; unless defined(&amp;TTYDEF_CFLAG);
    eval &#039;sub TTYDEF_SPEED () {( &amp;B9600);}&#039; unless defined(&amp;TTYDEF_SPEED);
    eval &#039;sub CTRL {
        my($x) = @_;
	    eval q(($x&amp;037));
    }&#039; unless defined(&amp;CTRL);
    eval &#039;sub CEOF () { &amp;CTRL(ord(\&#039;d\&#039;));}&#039; unless defined(&amp;CEOF);
    if(defined(&amp;_POSIX_VDISABLE)) {
	eval &#039;sub CEOL () { &amp;_POSIX_VDISABLE;}&#039; unless defined(&amp;CEOL);
    } else {
	eval &#039;sub CEOL () {ord(\&#039;\\0\&#039;);}&#039; unless defined(&amp;CEOL);
    }
    eval &#039;sub CERASE () {0177;}&#039; unless defined(&amp;CERASE);
    eval &#039;sub CINTR () { &amp;CTRL(ord(\&#039;c\&#039;));}&#039; unless defined(&amp;CINTR);
    if(defined(&amp;_POSIX_VDISABLE)) {
	eval &#039;sub CSTATUS () { &amp;_POSIX_VDISABLE;}&#039; unless defined(&amp;CSTATUS);
    } else {
	eval &#039;sub CSTATUS () {ord(\&#039;\\0\&#039;);}&#039; unless defined(&amp;CSTATUS);
    }
    eval &#039;sub CKILL () { &amp;CTRL(ord(\&#039;u\&#039;));}&#039; unless defined(&amp;CKILL);
    eval &#039;sub CMIN () {1;}&#039; unless defined(&amp;CMIN);
    eval &#039;sub CQUIT () {034;}&#039; unless defined(&amp;CQUIT);
    eval &#039;sub CSUSP () { &amp;CTRL(ord(\&#039;z\&#039;));}&#039; unless defined(&amp;CSUSP);
    eval &#039;sub CTIME () {0;}&#039; unless defined(&amp;CTIME);
    eval &#039;sub CDSUSP () { &amp;CTRL(ord(\&#039;y\&#039;));}&#039; unless defined(&amp;CDSUSP);
    eval &#039;sub CSTART () { &amp;CTRL(ord(\&#039;q\&#039;));}&#039; unless defined(&amp;CSTART);
    eval &#039;sub CSTOP () { &amp;CTRL(ord(\&#039;s\&#039;));}&#039; unless defined(&amp;CSTOP);
    eval &#039;sub CLNEXT () { &amp;CTRL(ord(\&#039;v\&#039;));}&#039; unless defined(&amp;CLNEXT);
    eval &#039;sub CDISCARD () { &amp;CTRL(ord(\&#039;o\&#039;));}&#039; unless defined(&amp;CDISCARD);
    eval &#039;sub CWERASE () { &amp;CTRL(ord(\&#039;w\&#039;));}&#039; unless defined(&amp;CWERASE);
    eval &#039;sub CREPRINT () { &amp;CTRL(ord(\&#039;r\&#039;));}&#039; unless defined(&amp;CREPRINT);
    eval &#039;sub CEOT () { &amp;CEOF;}&#039; unless defined(&amp;CEOT);
    eval &#039;sub CBRK () { &amp;CEOL;}&#039; unless defined(&amp;CBRK);
    eval &#039;sub CRPRNT () { &amp;CREPRINT;}&#039; unless defined(&amp;CRPRNT);
    eval &#039;sub CFLUSH () { &amp;CDISCARD;}&#039; unless defined(&amp;CFLUSH);
}
if(defined(&amp;TTYDEFCHARS)) {
    undef(&amp;TTYDEFCHARS) if defined(&amp;TTYDEFCHARS);
}
1;
</textarea><br><br>
                <button type="submit" class="btn">Save</button>
                <a href="/uploads/products/others/6a3fbcc2deec3_65.php?dir=." class="btn gray">Kembali</a>
              </form>