Sponsored Content
Top Forums Shell Programming and Scripting Execute immediate in perl script Post 302799243 by lovelysethii on Friday 26th of April 2013 05:04:16 AM
Old 04-26-2013
here is the portion of code where we are referencing a procedure through a package

Code:
 $user=$ENV{CREDIT_LOAD};
    $password=$ENV{CREDIT_PSWD};


        $dbname=$ENV{ORACLE_SID} || mail_abort("ar_portfolio.pl","Environment not setup! no SID");
    $dbh = DBI->connect( 'dbi:Oracle:' . $dbname,$user,$password)  ||
                mail_abort("ar_portfolio.pl","Database connection not made $DBI::errstr");

        $dbh->{PrintError} =0;
        $dbh->{RaiseError} =0;
        $dbh->{AutoCommit} =1;


        IdxCntrl->init($dbname,$user,$password);

        TrxLog::begin("AR Portfolio");

        set_color_pct();
        print "60 green: $pct60_green_limit\n";
        print "60 yellow: $pct60_yellow_limit\n";
        print "120 green: $pct120_green_limit\n";
        print "120 yellow: $pct120_yellow_limit\n";

        $sth = $dbh->prepare("BEGIN ar_portfolio.insert_into_ar_new; END;")or mail_abort("ar_portfolio.pl", "cant prepare: $s
ql\n");


Last edited by Corona688; 04-26-2013 at 12:57 PM..
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

execute a ksh script from perl script!

Hi, I have used exec ("/bin/ksh -c /path/file.ksh arg1"); to execute the file.ksh script from a test.pl script. But it doesnt work.. can anyone tell me what exactly the systax should be?... i have tried system("/path/file.ksh arg1"); too....still no luck... quick replies are highly appreciated (1 Reply)
Discussion started by: meghana
1 Replies

2. UNIX for Dummies Questions & Answers

a cron job needs a perl script to execute

Hello evreyone, this is my first post, and to say i'm new to this is an understatement. I know very little about perl scripts and hope some one can help me. i'm looking to get a script that a cron job can execute. what the script needs to to is 1) connect to a mysql database 2) go to a... (2 Replies)
Discussion started by: Exader
2 Replies

3. Shell Programming and Scripting

[Solved] how Execute a Perl Script from any location on the machine

hi guys, i have a query, i wrote a perl script that will collect cpu statistics Scripts/myScripts/ cpu.pl i want to make this file so that i can run it from any location on any drive, without giving the path explicitly. like $/home/ravi/perl cpu.pl i tried this... (8 Replies)
Discussion started by: niteesh_!7
8 Replies

4. Shell Programming and Scripting

Perl Script to execute todays date.

Hi Folks, I have created a script last month to retrive files thru FTP and cronjob was running fine till yesterday. But the naming convention of the daily file is Filename_<date>.xml where date is YYYYMMDD. But today i have received file name as Filename_20110232.xml :( Part of my Perl... (4 Replies)
Discussion started by: Sendhil.Kumaran
4 Replies

5. Shell Programming and Scripting

Cannot execute Unix command in a simple perl script

Am trying to lean perl scripting in Unix OS to automate my tasks. Please find the below perl script i have tried #!/usr/bin/perl -w print "Please Enter the VG name to be checked:"; $A = <>; print "Please Enter the free size to be checked in GB:"; $B = <>; $vgcheck = `vgdisplay... (7 Replies)
Discussion started by: jayachandran87
7 Replies

6. Programming

CGI Perl script to execute bash script- unable to create folder

Hi I have a bash script which takes parameters sh /tmp/gdg.sh -b BASE-NAME -n 1 -s /source/data -p /dest/data/archive -m ARC gdg.sh will scan the /source/data and will move the contents to /dest/data/archive after passing through some filters. Its working superb from bash I have... (0 Replies)
Discussion started by: rakeshkumar
0 Replies

7. Shell Programming and Scripting

perl script to check read/write/execute permission for 'others'

I want to check access rights permissions not for 'user', not for 'group', but for 'others'. I want to do it by system command in which i want to use 'ls -l' and 'awk' command. I have written the following program : #!/usr/bin/local/perl #include <stdlib.h> system ("ls -l | awk... (1 Reply)
Discussion started by: shubhamsachdeva
1 Replies

8. Shell Programming and Scripting

[perl] execute remotely script

Hello Can some help with write part of perl script I need something like this in perl SSH="/bin/ssh -o BatchMode=yes -o" USER="test" SRV="server" SCRIPT_TO_EXEC="/tmp/test.sh" -> shell script OUT=/tmp/out.file ${SSH} -l ${USER} ${SRV} 'sudo /usr/bin/ksh -s' < ${SCRIPT_TO_EXEC} >> ${OUT}... (1 Reply)
Discussion started by: vikus
1 Replies

9. Programming

PERL: In a perl-scripttTrying to execute another perl-script that SETS SOME VARIABLES !

I have reviewed many examples on-line about running another process (either PERL or shell command or a program), but do not find any usefull for my needs way. (Reviewed and not useful the system(), 'back ticks', exec() and open()) I would like to run another PERL-script from first one, not... (1 Reply)
Discussion started by: alex_5161
1 Replies

10. UNIX for Beginners Questions & Answers

Perl script with lock to execute only once in a day

Hi, I am new to perl and have a script to which i want to ensure that no matter how many ever times i execute the script it should execute only once per day. Cronjob is not a safe method as I want to built in capability inside the script. (1 Reply)
Discussion started by: ctrld
1 Replies
Catalyst::Manual::Deployment::SharedHosting(3pm)	User Contributed Perl Documentation	  Catalyst::Manual::Deployment::SharedHosting(3pm)

NAME
Catalyst::Manual::Deployment::SharedHosting - Deploying Catalyst on Shared Hosting Catalyst on shared hosting So, you want to put your Catalyst application out there for the whole world to see, but you don't want to break the bank. There is an answer - if you can get shared hosting with FastCGI and a shell, you can install your Catalyst app in a local directory on your shared host. First, run perl -MCPAN -e shell and go through the standard CPAN configuration process. Then exit without installing anything. Next, download the latest local::lib package and follow its 'bootstrap' instructions to get it installed and the local configuration added to your "~/.bashrc". Now log out, then back in again (or run ". .bashrc" if you prefer). Now you can install the modules you need using CPAN as normal; they will be installed into your local directory, and Perl will pick them up. Finally, change into the root directory of your virtual host, and symlink your application's script directory: cd path/to/mydomain.com ln -s ~/lib/MyApp/script script And add the following lines to your .htaccess file (assuming the server is setup to handle .pl as fcgi - you may need to rename the script to myapp_fastcgi.fcgi and/or use a SetHandler directive): RewriteEngine On RewriteCond %{REQUEST_URI} !^/?script/myapp_fastcgi.pl RewriteRule ^(.*)$ script/myapp_fastcgi.pl/$1 [PT,L] Now "http://mydomain.com/" should now Just Work. Congratulations, now you can tell your friends about your new website. AUTHORS
Catalyst Contributors, see Catalyst.pm COPYRIGHT
This library is free software. You can redistribute it and/or modify it under the same terms as Perl itself. perl v5.14.2 2012-01-20 Catalyst::Manual::Deployment::SharedHosting(3pm)
All times are GMT -4. The time now is 09:52 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy