[ create a new paste ] login | about

Link: http://codepad.org/CgFGPB8O    [ raw code | output | fork ]

Perl, pasted on Feb 16:
1
2
3
4
5
6
7
8
9
@a=<DATA>;
print @a;
print "__DATA__\n";
print @a;
__DATA__
@a=<DATA>;
print @a;
print "__DATA__\n";
print @a;


Output:
1
2
3
4
5
6
7
8
9
@a=<DATA>;
print @a;
print "__DATA__\n";
print @a;
__DATA__
@a=<DATA>;
print @a;
print "__DATA__\n";
print @a;


Create a new paste based on this one


Comments: