- 博客(19)
- 资源 (7)
- 收藏
- 关注
RSS订阅原创 PERL中的哈希表操作
哈希表究其实质而言就是一种数据结构，可以随机存取，没有上限，但是不同之处则在于数组呢，是根据数组来确定所要求的数据在数组中的偏移量，而哈希则是以名字来进行检索，或者说作为索引值的，也就是说检索用的键不是数字，而是保证唯一性的字符串，即键值，键值必须保持唯一性！！需要指出的是，虽然哈希表的键的名称要求必须唯一，但是对于键的值，则是可以相同的。$family_name{"fred"}="J
2013-10-30 10:37:42
2875
原创 PERL中的文件读写
就像已知的，其他编程语言类似，PERL解释器，是没有办法自己进行文件读写的，但是呢，可以调用操作系统的文件读写功能，现在我们说下自己的
2013-10-28 10:42:39
881
原创 CreateWindowEx返回1400
先不说了，直接上代码吧，妹的，调了好长时间就是不知道那里的错误，可，等发现了，却不知是哭是笑哈;;程序平台定义.386.Model Flat,StdCallOption CaseMap:None;;;文件包含include windows.incinclude kernel32.incinclude
2013-10-24 21:43:34
1440
原创 printf和文件句柄
printf "%g,%g,%g\n",5/2,51/17,51*17;#g是可以按照需要自动选择浮点数，整数，或者是指数形式printf "in %d days!\n",17.85 ; #%d自动舍去小数点后面的部分，直接输出整数printf "%10s\n","hehe";#10呢，其含义就是设定输出的宽度，并且输出的字符在右端printf "%12f\n",6*7+2/3;# %
2013-10-24 19:44:39
1317
原创 PERL中的流程控制
先不说了，只是我的学习笔记，所以呢，在这里只是列出代码，并写下自己的心得$input=undef;$inputCount=1;do{$_=; if($_ eq "admin\n"){print "welcome home my lord\n";$input="hehe";}else{print "please try again\n";;
2013-10-22 21:16:26
721
原创 PERL子程序的调用与return操作符
先不说别的，先上代码use strict;sub which_element_is(){my ($what,@array)=@_;foreach(0..$#array){if($what eq $array[$_]){return $_;}}-1;}my @names=qw(fred betty dino wilma pebbles);
2013-10-19 10:12:41
5908
原创 PERL中的私有变量
默认情况下，PERL中所有的变量都是全局变量，也就是说在程序中的任何地方都可以访问他们，但是你也可以随时用一个操作符来创建私有的词法变量，即mysub max{ my($m,$n)=@_; if($m>$n) print $m; else print $n;}使用my操作符限定过的变量，其作用域只在其所在的代码块中有效，不被
2013-10-17 08:32:47
1595
原创 PERL语言的子程序
子程序的定义可以使用关键字 sub 子程序名(不包含&)，以及经过缩进的花括号$n=1;&marine;&marine;&marine;sub marine{ print "Hello $n\n"; $n+=1; }子程序可以在程序的任意位置，如果提前使用在后定义的话，也不用事先声明，只是子函数只能是定义，经过调用后
2013-10-14 21:56:29
956
转载 各种编程语言查找按钮事件
一、VB程序 其实,VB的按纽事件的找法是最为普遍的,也就是大家所谓的万能断点.其实也不仅仅是针对按纽事件,还有很多其他的用处,如取消NAG,启动框,灰色按纽或隐藏按纽,启动时的timer事件等等,具体的就自己去总结吧,这里只演示按纽事件!OD载入后,CTRL+B,816C24 确定后,就会来到下图处: 然后,就在下面的JMP处F2下断,下完后CTRL+L,如果还有,就
2013-10-14 19:58:06
4283
原创 SEH溢出攻击续
#include "stdafx.h"#include #include#includeusing namespace std;int main(){ MessageBox(NULL,L"DSA",0,0); char buf[10]; int eip=(int)main; memcpy(buf+88,(int*)&eip
2013-10-14 19:25:16
1336
原创 PERL的上下文环境
上下文指的是表达式所在的位置，在PERL解析表达式的时候，要么希望是一个标量，要么希望得到一个列表，在这里，表达式所在的位置不同，表达式的意义就会有所不同举例说明： @people=qw(fred barney hehe); $number=42+@people; print $number#这里，再进行$number=42+@people时，期望获得的是一个标量，因而，@peo
2013-10-14 15:57:36
1313
原创 汇编中try catch的实现
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>;平台定义.386.Model Flat,StdCallOption CaseMap:None;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>;文件包含include
2013-10-14 15:22:24
1730
原创 PERL数组的遍历
在双引号内可以使用@直接输出数组@rocks=qw(flinstone slate rubblke);print "quarrz @rocks limtstone\n";#print "fred@rocks.com.cn";#如果我们真的想要输出@21136.com.cn，那么我们需要将@转义，即\@;或者直接使用单引号@fred=qw(hello dolly);$y=2;$x=
2013-10-10 21:09:32
20531
原创 汇编中的资源文件脚本
菜单，图表与对话框都是可执行文件的组成部分，他们是以资源的形式存放在文件中的，但这些资源并不存放在数据段中，而是单独的放在一个节区当中。 资源文件是以".rc"为扩展名的脚本文件，由资源文件rc.exe编译成res为扩展名的二进制的资源文件，最后在link.exe文件链入可执行文件。//#include "resource.h"#define ICO_MAIN 1000H
2013-10-10 11:19:11
1310
原创 PERL的数组操作
此次我们说下，关于PERL中数组的头尾操作，当然这是在不使用索引的情况下，类似与汇编当中，PUSH和pop是在尾部，或者说在数组的右边进行的添加或者删除操作，演示代码如下： @array=5..9; $fred=pop(@array);#原数组array中是 5 6 7 8 9，pop之后则是5 6 7 8 print $fred;
2013-10-09 21:47:21
837
原创 WIN32汇编为按钮添加处理过程
由于笔者也是初学者，学到哪，也就写到哪，望各位大神见谅哈，本博文呢，主要是在主窗体中添加了一个button，但是该Button是动态添加的，也就是说使用了CreateWindowEx API函数，同时为该按钮的点击事件添加处理过程: 先说下原理，其实呢，很简单，就是先检查uMsg是否是WM_COMMAND,然后呢，就看看，触发事件的控件的ID是否使我们要处理的控件的ID，就这两样，但
2013-10-08 21:10:41
1295
原创 PERL中的数组和列表
PERL数组中所有的元素都是有初始值的，即为undef，同其他的编程语言一样，索引值从0开始，现在如下PERL程序：my $fred[0]="abc";my $fred[1]="bcd";my $fred[2]=7;PERL数组与其他不同的是PERL数组可能包含数字，字符串,undef等等，不同的数据类型，同时我们要记住，每个元素都是独立不相关的标量值，也就是说$fred[
2013-10-08 19:33:26
1075
原创 我的第一个win32汇编程序
.386.Model Flat,stdcalloption casemap:none;头文件包含include windows.incinclude kernel32.incincludelib kernel32.libinclude user32.incincludelib user32.libinclude gdi32.incincludelib gd
2013-10-01 16:22:59
1008
原创 SEH溢出攻击
环境使用：WIN7 ,VS2010，攻击具有溢出漏洞的程序，其源代码如下#include "stdafx.h"#include #include#includeusing namespace std;int main(){HANDLE hLib=LoadLibraryA("D:\\project\\dll\\Debug\\dll.dll");FARPROC
2013-10-01 10:07:52
1651
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人