Hello,
I have written some scripts that query the user and waits for keyboard input for an answer. I was wondering if there is any generic code snippets out there that would allow me to run this as a GUI. I am thinking of a simple dialogue box that would display the question and have a text... (1 Reply)
Hi All,
I have written a code in tcl which is supposed to open an GUI in which numbers will be entered & after performing selected operation it wil show a result.
#!/usr/local/bin/wish
#package require Tk
#global opr
proc DoOperation {} {
global opr
set fstno
set scdno
set result ... (2 Replies)
I am not sure what I am doing wrong here, I did some research and only confused myself further. Any help would be greatly appreciated. I need to make this work for work tomorrow.
There are only 34 lines of code in this script, yet its complaining about line 35
Here is the code:
... (7 Replies)
Hi. This is code snipped I have. I am trying to play with signals...
int main(int argc, char *argv) {
int i;
sigset_t s; //declare set of signals
sigfillset(&s); //initializes the signal set to include all of the defined signals
int j;
for ( i = 0 ; i < 70 ; i++){
j... (6 Replies)
perl -e '@stat=stat("/etc/passwd");$now_string=localtime($stat);print $ARGV.":$now_string\n"' ./file_name
Please if anyone can describe it.
Thanks in advance (1 Reply)
Hi All, i believe this is not very efficient. another method would be appreciated for these. basically i read a file with tab delimited column and pass the column to another perl script.
while read line
do
timestamp=`echo "$line"|awk -F"\t" '{print $1}'`
severity=`echo... (15 Replies)
I want to do FTP an Huge XML file to mainframe server using AIX server
Since my file size is huge, i want to split the XML file based on a delimiter , the record delimiter should be set after every 27000 bytes of data
and then do the ftp
This is done becos the data send to the mainframe must... (1 Reply)
Discussion started by: vishwanath001
1 Replies
LEARN ABOUT DEBIAN
je::code
JE::Code(3pm) User Contributed Perl Documentation JE::Code(3pm)NAME
JE::Code - ECMAScript parser and code executor for JE
SYNOPSIS
use JE;
$j = new JE;
$code = $j->compile('1+1'); # returns a JE::Code object
$code->execute;
METHODS
$code->execute($this, $scope, $code_type);
The "execute" method of a parse tree executes it. All the arguments are optional.
The first argument will be the 'this' value of the execution context. The global object will be used if it is omitted or undef.
The second argument is the scope chain. A scope chain containing just the global object will be used if it is omitted or undef.
The third arg indicates the type of code. 0 or undef indicates global code. 1 means eval code (code called by JavaScript's "eval"
function, which has nothing to do with JE's "eval" method, which runs global code). Variables created with "var" and function
declarations inside eval code can be deleted, whereas such variables in global or function code cannot. A value of 2 means function
code, which requires an explicit "return" statement for a value to be returned.
If an error occurs, "undef" will be returned and $@ will contain the error message. If no error occurs, $@ will be a null string.
$code->set_global( $thing )
You can transfer a JE::Code object to another JavaScript environment by setting the global object this way. You can also set it to
"undef", if, for instance, you want to serialise the compiled code without serialising the entire JS environment. If you do that,
you'll need to set the global object again before you can use the code object.
FUNCTIONS
JE::Code::add_line_number($message, $code_object, $position)
WARNING: The parameter list is still subject to change.
This routine append a string such as 'at file, line 76.' to the error message passed to it, unless it ends with a line break already.
$code_object is a code object as returned by JE's or JE::Parser's "parse" method. If it is omitted, the current value of
$JE::Code::code will be used (this is set while JS code is running). If $JE::Code::code turns out to be undefined, then $message will
be returned unchanged (this is subject to change; later I might make it use Carp to add a Perl file and line number).
$position is the position within the source code, which will be used to determine the line number. If this is omitted, $JE::Code::pos
will be used.
EXPORTS
"add_line_number" can optionally be exported.
SEE ALSO
JE
perl v5.14.2 2012-03-18 JE::Code(3pm)