getpref = overloaded() function getpref.string.number(key,defaultVal) local userdata = CCU…
#!/usr/bin/perl use Mail::Sender; #new一个sender,定义编码格式防止乱码 my $sender = new Mail::Sender{ c…
#!/ms/dist/perl5/bin/perl5.10 use Tie::File; use strict; use warnings; sub process{ my @li…
#!/usr/bin/perl $pwd="/home/program/"; $wc_temp="$pwd/wc_temp"; sub sum{ my @file=<*>…
^xl_(?!.*?_online).*?$
#!/usr/bin/perl # ppm install DBD::mysql use DBI; # use strict; my $dbname = "test"; my $l…
#! perl -w use strict; use Win32::OLE; use Win32::OLE::Const 'Microsoft Excel'; $Win32::OL…
#!/usr/bin/env python # # dnsspider.py - multithreaded subdomain bruteforcer # # bruteforc…
#!/usr/bin/perl use strict; use DBI; my @drivers; @drivers = DBI->available_drivers(); …
#!/usr/bin/perl #=========================================================================…
#!/usr/bin/perl -w use Win32::NetAdmin; $host = ''; $username = "userName"; $password = "p…
use IO::Socket; $server = IO::Socket::INET->new ( LocalPort => 1247, Type => SOCK…
可以把一个fasta序列格式的核酸序列 转换为其反向互补链,并且每行60个碱基的格式化输出
使用perl socket 在WINDOWS DHCP服务上 实现ip绑定
Thank you for your sharing. I am worried that I lack creative ideas. It is your article that makes me full of hope. Thank you. But, I have a question, can you help me?
Thanks for sharing. I read many of your blog posts, cool, your blog is very good.
Can you be more specific about the content of your article? After reading it, I still have some doubts. Hope you can help me.
Thanks for sharing. I read many of your blog posts, cool, your blog is very good.
Excellent blog here Also your website loads up very fast What web host are you using Can I get your affiliate link to your host I wish my web site loaded up as quickly as yours lol