笔记1

#!/usr/bin/env bash
 
src_dir=/srv/http/sh/exp1/
 
dir=`ls -1 $src_dir`
 
for dir_name in `ls -1 $src_dir`;
do
    if [ -d $src_dir$dir_name ]
    then
        #echo $src_dir$dir_name
        for file_name in `ls -l $src_dir$dir_name | grep ^- | awk '{print $9}'`;
        do
            mv $src_dir$dir_name"/"$file_name $src_dir$dir_name"/"$dir_name"_"$file_name
        done
    fi
done




---for循环的shell脚本,循环显示某个目录的所有文件名称
-bash-3.2$ more cycle.sh
filelist=`ls -l|awk {'print $9'}`
for file in $filelist
do
 if [ -f $file ]
 then
    echo "echo ${file}"
 fi
done






perl Makefile.PL
*** ExtUtils::AutoInstall version 0.63
*** Checking for dependencies...
[Core Features]
- DBI         ...loaded. (1.634 >= 1.38)
[High Resolution Timing]
- Time::HiRes ...loaded. (1.9725)
[POD Format Testing]
- Test::Pod   ...loaded. (1.51)
*** ExtUtils::AutoInstall configuration finished.


Configuring Informix Database Driver for Perl DBI Version 2013.0521 (2013-05-21) (aka DBD::Informix)
        You are using DBI version 1.634 and Perl version 5.010001
Remember to actually read the README file!


Perl:     /usr/bin/perl v5.010001 x86_64-linux-thread-multi dl_dlopen.xs
System:   linux x86-032.build.eng.bos.redhat.com 2.6.18-406.el5 #1 smp fri may 1 10:37:57 edt 2015 x86_64 x86_64 x86_64 gnulinux 
*** Ideally, you should upgrade to Perl version 5.016003 or later.




*** You didn't read the README file!
No executable ESQL/C compiler /wls/oracle/informix/bin/esql


[root@CNSZ044953 DBD-Informix-2013.0521]# pwd
/wls/oracle/mysql_perl/DBD-Informix-2013.0521
[root@CNSZ044953 DBD-Informix-2013.0521]# cd /wls/oracle/informix/bin/esql
bash: cd: /wls/oracle/informix/bin/esql: No such file or directory
[root@CNSZ044953 DBD-Informix-2013.0521]# cd /wls/oracle/informix
[root@CNSZ044953 informix]# ls


select * from ag_alert_mode for update;




set transaction isolation level read uncommitted --设置允许脏读