Perl - [ Mail::Sendmail ]

This summary is not available. Please click here to view the post.

Read More

Oracle [ JOBS AND PROCEDURE Consult ]

 1 - select job,what from dba_jobs

resul: owner.name_procedure

2 - select text from dba_source where owner='OWNER' and name='NAME_PROCEDURE';

Good reading !!!

Read More

Oracle - [ dbms_scheduler ]

SQL> select owner,job_name,enabled from all_scheduler_jobs;

OWNER                          JOB_NAME                       ENABL
------------------------------ ------------------------------ -----
SYS                            XMLDB_NFS_CLEANUP_JOB          FALSE
SYS                            SM$CLEAN_AUTO_SPLIT_MERGE      TRUE
SYS                            RSE$CLEAN_RECOVERABLE_SCRIPT   TRUE
SYS                            FGR$AUTOPURGE_JOB              FALSE
SYS                            BSLN_MAINTAIN_STATS_JOB        TRUE
SYS                            DRA_REEVALUATE_OPEN_FAILURES   TRUE
SYS                            HM_CREATE_OFFLINE_DICTIONARY   FALSE
SYS                            ORA$AUTOTASK_CLEAN             TRUE
SYS                            FILE_WATCHER                   FALSE
SYS                            PURGE_LOG                      TRUE
APEX_040000                    ORACLE_APEX_DAILY_MAINTENANCE  TRUE

OWNER                          JOB_NAME                       ENABL
------------------------------ ------------------------------ -----
APEX_040000                    ORACLE_APEX_WS_NOTIFICATIONS   TRUE
APEX_040000                    ORACLE_APEX_MAIL_QUEUE         TRUE
APEX_040000                    ORACLE_APEX_PURGE_SESSIONS     TRUE

14 rows selected.


SQL> begin
  2  dbms_scheduler.drop_job(job_name=>'SYS.PURGE_LOG');
  3  end;
  4  /

PL/SQL procedure successfully completed.


SQL> begin
  2  dbms_scheduler.enable('FILE_WATCHER');
  3  end;
  4  /

PL/SQL procedure successfully completed.


SQL> begin
  2  dbms_scheduler.disable('FILE_WATCHER');
  3  end;
  4  /

PL/SQL procedure successfully completed.

Read More

Makefile [ Automation modules for installation ] PERL

#Commands
CD_IN='cd'
CD_OUT='cd ..'
TAR='tar -xvf'
PERL_MAKEFILE='perl Makefile.PL'
MAKE='make'
MAKE_INSTALL='make install'
CHMOD='chmod +x Makefile'

#Module
M1=List-MoreUtils-0.33
M2=ExtUtils-MakeMaker-6.62
M3=Perl-OSType-0.005
M4=Module-Metadata-1.000011
M5=PathTools-3.33
M6=Locale-Maketext-Simple-0.21
M7=Module-CoreList-2.73
M8=Module-Load-0.22
M9=Params-Check-0.36
M10=Module-Load-Conditional-0.54
M11=IPC-Cmd-0.78
M12=ExtUtils-CBuilder-0.280205
M13=ExtUtils-ParseXS-3.15
M14=Test-Simple-0.98
M15=Perl-OSType-1.002
M16=Test-Harness-3.25
M17=Compress-Raw-Bzip2-2.055
M18=Compress-Raw-Zlib-2.056
M19=IO-Compress-2.055
M20=IO-Zlib-1.10M25=ExtUtils-Install-1.54
M21=Package-Constants-0.02
M22=Algorithm-Diff-1.1902
M23=Text-Diff-1.41
M24=Archive-Tar-1.90
M25=ExtUtils-Install-1.54
M26=Module-Build-0.4003
M27=Config-IniFiles-2.77
M28=DBD-Oracle-1.50
M29=DBI-1.622

#Uncompress
FILE_GZ=`ls *.gz`
for i in ${FILE_GZ} ; do \
        ${TAR} ${i}
done;

#Execute Install
for i in ${M1} ${M2} ${M3} ${M4} ${M5} ${M6} ${M7} ${M8} ${M9} ${M10} ${M11} ${M12} ${M13} ${M14} ${M15} ${M16} ${M17} ${M18} ${M19} ${M20} ${M21} ${M22} ${M23} ${M24} ${M25} ${M26} ${M27} ${M28} ${M29} ; do \
        ${CD_IN} ${i}
        ${PERL_MAKEFILE}
        ${CHMOD}
        ${MAKE}
        ${MAKE_INSTALL}
        ${CD_OUT}
done;

#Delete Dir
DIR=`ls -d */`
for i in ${DIR}; do \
        rm -rf ${i}
done;

Read More