Returning values from one perl module to another

Ok. Now I can call a Perl program from another Perl program but I am having trouble returning values back to the calling Perl program. Return does not seem to work, Any suggestions?? Robert ( Kent ) Collins: IBM Certified Solutions Expert Cell Phone: 214.632.3940 DBA Intranet Site: http:/

Unix awk

Does any one out in Per Land have a Perl program that performs the same functions as Unix awk? If yes would you mind sharing it? Robert ( Kent ) Collins: IBM Certified Solutions Expert Cell Phone: 214.632.3940 DBA Intranet Site: http://ora3dba.i2.com/support "Major advancements in technology

Calling one perl program from another

How do you execute or call a Perl(PROG1.pl) program from another Perl(PROG2.pl) program? Robert ( Kent ) Collins: IBM Certified Solutions Expert Cell Phone: 214.632.3940 DBA Intranet Site: http://ora3dba.i2.com/support "Major advancements in technology are indistinguishable from Magic"

string checks

What is the best way in Perl to do the following? Check $string to see if the following path is found /this is right/ If found anywhere in the string return 1, if not return 0. The whole pattern must be found just like written. Robert ( Kent ) Collins: IBM Certified Solutions Expert Cell Pho

Databases and Perl

I am in the process of developing perl code to create and populate a oracle database. Have anyone out there in PerlLand ever developed a process that will create a oracle database, tablespaces and create tables and indexes? If yes, would you mind sharing your code? DB2 would work just as we

print a string

The following line of code causes 2-lines of output to the file: print LOG "qcfg_dt='$qcfg_dt' \n"; $qcfg_dt contains Monday, August 20, 2001 8:53:26 PM The second quote is written on the next line. In the file the information looks like this: qcfg_dt='Monday, August 20, 2001

calling between perl programs

I am confused about how perl provides for separate perl scripts to talk to each other. In k-shell I can load a function using . . In the file I have defined a function function myfunction { I can execute that function from within any k-shell file by simply myfunction

k-shell case statement

What is the best perl example of a k-shell case statement as follows: case "$VAR1" in 1 ) statements ;; 2) statements ;; * ) other statements esac

k-shell to Perl

Is there a conversion product(shareware) that I can use to convert k-shell code to Perl? Robert ( Kent ) Collins: IBM Certified Solutions Expert Cell Phone: 214.632.3940 DBA Intranet Site: http://ora3dba.i2.com/support "Major advancements in technology are indistinguishable from Magic"

Clear

I am writing lines of information to the STDOUT(Screen). In Unix k-shell I can execute the "clear" command to remove all lines from the screen. How is this done in Perl? Thanks Robert ( Kent ) Collins: IBM Certified Solutions Expert Cell Phone: 214.632.3940 DBA Intranet Site: http://ora3db