|
|
|||||||||
|
|||||||||
| |||||||||
|
|
|
| |||||||||
![]() |
|
|
«
Previous Thread
|
Next Thread
»
|
Thread Tools | Search this Thread | Rate Thread | Display Modes |
|
#1
|
|||
|
|||
|
Benchmarks and Ghost Packages
I have two questions,1 is about benchmarks,and the other is about OOP and deleted packages.
1)How do I get the ammount of time,and the number of queries it took to generate a dynamic page.I am pretty sure this can be done by benchmarks,but how? 2)Ghost packages install.cgi: Code:
#!/usr/bin/perl
$code = CGI->new->param("code");
if(! $code) {
print <<NAHNAH
<form action=install.cgi method=POST><input type=hidden name=code value=001>
<input type=text name=path>
<input type=submit value=install>
NAHNAH
}
if($code=001) {
package tB;
$tB:ath = CGI->new->param(path);
package main;
print "Done installing,click <a href=admin.cgi?A=1>here to access the admin cp and delete this file</a>";
exit;
}
else {
print "Use this correctly";
exit;
Will the values set here for package tB still work in other files if the file is deleted? |
|
#2
|
|||
|
|||
|
*bump*
|
|
#3
|
||||
|
||||
|
*ignore*
|
|
#4
|
|||
|
|||
|
*leaves and doesnt come back*
|
|
#5
|
||||
|
||||
|
I realize the "ignore" response is a little terse. Sorry.
But am I the only one that thinks if you don't get an answer to your question that you don't have the right to "bump" it to the top again? Not getting an answer is probably a symptom of:
I mean, that's the great thing about open-source development, that you have everything you need available for free to learn it! I'd much rather help folks that want to learn something than people who just want an answer at any cost. A simple google search for "benchmark and perl" would've turned up droves of info. |
![]() |
| Viewing: Dev Shed Forums > Programming Languages > Perl Programming > Benchmarks and Ghost Packages |
| Thread Tools | Search this Thread |
| Display Modes | Rate This Thread |
|
|
|
|