Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    use IPC::Open2;
    use strict;
    ...
    close($JSREAD);
    
    print join ("\n", @output);
    
  2. or download this
        var input="";
        var line="";
    ...
                input += "\n";
            }
        }
    
  3. or download this
    print $JSWRITE "var foo='bar';\n";
    print $JSWRITE "print(foo);\n";
    ...
    close($JSREAD);
    
    print join ("\n", @output);
    
  4. or download this
    print $JSWRITE "input += '$escaped_line_of_file';\n";