EliteZ [ 0day (xc) Our ] News : PHD SOCIAL SCIENCE HEADER PUBLIC GENERATOR IN PERL … . EASY PRICKY … .

  1. #!/usr/bin/perl
  2. # immanuel yohanes patra (skraito) with Lord ( Jesus Christ )
  3. # Thank You Lord ( Jesus Christ ) for this knowledge
  4. # Coded in Pekanbaru at 02-SEP-2013 07:16 pm
  5. # Love ya all True Jesus Church, my comrade as christian
  6. # http:/www.tjc.org
  7. # and lastly to our team 0x71, http:/0x71.org
  8. # Purpose of the program :
  9. # Header for Perl Generator
  10. # 0x71
  11. #
  12. #### Dont Edit this line
  13. ### usage -p mean for php -c c and c++ -e perl
  14. if((!@ARGV)||(!$ARGV[0]=~/-p/)||(!$ARGV[0]=~/-c/)||(!$ARGV[0]=~/-e/)){
  15. print”0x71 $! Generate Header usage : -p for php, -c c and c++ and -e for perl\n“andexit;
  16. }
  17. # Declare all variable
  18. $your_name;
  19. $time;
  20. $license;
  21. $team;
  22. $city_or_place_where_you_code_your_code;
  23. $purpose_of_the_program;
  24. # Never Edit this line which is time
  25. $time=localtime;
  26. # Set value. You can edit here or what i mean is edit this variable accordingly.
  27. $your_name=”immanuel yohanes patra (skraito)”;
  28. $license=”License by $team hacker team. \nYou cant use. You cant see. You cant do anything and finally you can’t modify”;
  29. $team=”0x71″;
  30. $city_or_place_where_you_code_your_code=”Pekanbaru”;
  31. $purpose_of_the_program=”$team Generate Header”;
  32. $website_of_your_team=”http:\\0x71.org”;
  33. ### Edit this. for windows put ure drive which is d:\\with_ure_directory_here or file_name
  34. $file_name_you_want_to_write_to=”~/0x71.pl”;
  35. ##### Don’t Edit this line
  36. if($ARGV[0]=~/-e/){
  37. open FILE,”>”,”$file_name_you_want_to_write_to”;
  38. print FILE “#!/usr/bin/perl -w
  39. # $your_name with Lord ( Jesus Christ )
  40. # Thank You Lord ( Jesus Christ ) for this knowledge
  41. # Coded in $city_or_place_where_you_code_your_code at $time
  42. # Love ya all True Jesus Church, my comrade as christian
  43. # http:/www.tjc.org
  44. # and lastly to our team $team, $website_of_your_team
  45. # Purpose of the program :
  46. # $purpose_of_the_program
  47. #
  48. #
  49. “;
  50. close FILE;
  51. }
  52. if($ARGV[0]=~/-p/){
  53. open FILE,”>”,”$file_name_you_want_to_write_to”;
  54. print FILE “/* $your_name with Lord ( Jesus Christ )
  55. * Thank You Lord ( Jesus Christ ) for this knowledge
  56. * Coded in $city_or_place_where_you_code_your_code at $time
  57. * Love ya all True Jesus Church, my comrade as christian
  58. * http:/www.tjc.org
  59. * and lastly to our team $team, $website_of_your_team
  60. * Purpose of the program :
  61. * $purpose_of_the_program
  62. *
  63. *
  64. */
  65. “;
  66. close FILE;
  67. }
  68. if($ARGV[0]=~/-c/){
  69. open FILE,”>”,”$file_name_you_want_to_write_to”;
  70. print FILE “/* $your_name with Lord ( Jesus Christ )
  71. * Thank You Lord ( Jesus Christ ) for this knowledge
  72. * Coded in $city_or_place_where_you_code_your_code at $time
  73. * Love ya all True Jesus Church, my comrade as christian
  74. * http:/www.tjc.org
  75. * and lastly to our team $team, $website_of_your_team
  76. * Purpose of the program :
  77. * $purpose_of_the_program
  78. *
  79. *
  80. */
  81. “;
  82. close FILE;
  83. }

Loading

Leave a Reply

Your email address will not be published. Required fields are marked *