Frasi divertenti per il PC-

 
Frase
WAV
Downloads
 
- - - - ->
4K
#!/usr/bin/perl ############################################################################## # Download Counter (SHOWLOAD) Version 3.5 # # Copyright 1998-99, UtilMind Solutions info@utilmind.com # # http://www.utilmind.com # # Created 3.XII.1998 Last Modified 9.V.1999 # ############################################################################## # COPYRIGHT NOTICE # # Copyright 1998-99 UtilMind Solutions. All Rights Reserved. # # # # This program is being distributed as shareware. It may be used and # # modified free of charge for personal, academic, government or non-profit # # use, so long as this copyright notice and the header above remain intact. # # Any commercial use should be registered. Please also send us an email, # # and let us know where you are using this script. By using this program # # you agree to indemnify UtilMind Solutuons from any liability. # # # # Selling the code for this program without prior written consent is # # expressly forbidden. Obtain permission before redistributing this # # program over the Internet or in any other medium. In all cases # # copyright and header must remain intact. # # # # Please check the README file for full details on installation # # and registration. # ############################################################################## # This is the counter log filename $databasefile = 'download.txt'; #################################################################### # Here you can set up the divider sign of the "top download" string # For example, if you set the ': ' sign, the string with the most # downloaded prgram will displayed as: thebestprogram.exe: 1432313 $topsign = ' - '; # Begining of the code. No modifications need below this line print "Content-Type: text/html\n\n"; # Get the input $link = $ENV{'QUERY_STRING'}; if (substr($link, 0, 1) eq '+') { $top = substr($link, 1, length($link) - 1); $showtop = 1; } open(FILE, $databasefile) || die Can't locate database file $!; @DATA = ; close(FILE); $SIZE = @DATA; if ($showtop eq 1) { if ($top ne '') { ($counter, $link) = split(/`/, $DATA[$top]); print "$link$topsign$counter"; } else { $total = 0; for ($i=0;$i<$SIZE;$i++) { ($counter, $dummy) = split(/`/, $DATA[$i]); $total = $total + $counter; } print $total; } exit; } for ($i=0;$i<$SIZE;$i++) { ($counter, $baselink) = split(/`/, $DATA[$i]); chop($baselink); if ($baselink eq $link) { print $counter; exit; } } print "?";
 
- - - - ->
8K
#!/usr/bin/perl ############################################################################## # Download Counter (SHOWLOAD) Version 3.5 # # Copyright 1998-99, UtilMind Solutions info@utilmind.com # # http://www.utilmind.com # # Created 3.XII.1998 Last Modified 9.V.1999 # ############################################################################## # COPYRIGHT NOTICE # # Copyright 1998-99 UtilMind Solutions. All Rights Reserved. # # # # This program is being distributed as shareware. It may be used and # # modified free of charge for personal, academic, government or non-profit # # use, so long as this copyright notice and the header above remain intact. # # Any commercial use should be registered. Please also send us an email, # # and let us know where you are using this script. By using this program # # you agree to indemnify UtilMind Solutuons from any liability. # # # # Selling the code for this program without prior written consent is # # expressly forbidden. Obtain permission before redistributing this # # program over the Internet or in any other medium. In all cases # # copyright and header must remain intact. # # # # Please check the README file for full details on installation # # and registration. # ############################################################################## # This is the counter log filename $databasefile = 'download.txt'; #################################################################### # Here you can set up the divider sign of the "top download" string # For example, if you set the ': ' sign, the string with the most # downloaded prgram will displayed as: thebestprogram.exe: 1432313 $topsign = ' - '; # Begining of the code. No modifications need below this line print "Content-Type: text/html\n\n"; # Get the input $link = $ENV{'QUERY_STRING'}; if (substr($link, 0, 1) eq '+') { $top = substr($link, 1, length($link) - 1); $showtop = 1; } open(FILE, $databasefile) || die Can't locate database file $!; @DATA = ; close(FILE); $SIZE = @DATA; if ($showtop eq 1) { if ($top ne '') { ($counter, $link) = split(/`/, $DATA[$top]); print "$link$topsign$counter"; } else { $total = 0; for ($i=0;$i<$SIZE;$i++) { ($counter, $dummy) = split(/`/, $DATA[$i]); $total = $total + $counter; } print $total; } exit; } for ($i=0;$i<$SIZE;$i++) { ($counter, $baselink) = split(/`/, $DATA[$i]); chop($baselink); if ($baselink eq $link) { print $counter; exit; } } print "?";
 
- - - - ->
13K
#!/usr/bin/perl ############################################################################## # Download Counter (SHOWLOAD) Version 3.5 # # Copyright 1998-99, UtilMind Solutions info@utilmind.com # # http://www.utilmind.com # # Created 3.XII.1998 Last Modified 9.V.1999 # ############################################################################## # COPYRIGHT NOTICE # # Copyright 1998-99 UtilMind Solutions. All Rights Reserved. # # # # This program is being distributed as shareware. It may be used and # # modified free of charge for personal, academic, government or non-profit # # use, so long as this copyright notice and the header above remain intact. # # Any commercial use should be registered. Please also send us an email, # # and let us know where you are using this script. By using this program # # you agree to indemnify UtilMind Solutuons from any liability. # # # # Selling the code for this program without prior written consent is # # expressly forbidden. Obtain permission before redistributing this # # program over the Internet or in any other medium. In all cases # # copyright and header must remain intact. # # # # Please check the README file for full details on installation # # and registration. # ############################################################################## # This is the counter log filename $databasefile = 'download.txt'; #################################################################### # Here you can set up the divider sign of the "top download" string # For example, if you set the ': ' sign, the string with the most # downloaded prgram will displayed as: thebestprogram.exe: 1432313 $topsign = ' - '; # Begining of the code. No modifications need below this line print "Content-Type: text/html\n\n"; # Get the input $link = $ENV{'QUERY_STRING'}; if (substr($link, 0, 1) eq '+') { $top = substr($link, 1, length($link) - 1); $showtop = 1; } open(FILE, $databasefile) || die Can't locate database file $!; @DATA = ; close(FILE); $SIZE = @DATA; if ($showtop eq 1) { if ($top ne '') { ($counter, $link) = split(/`/, $DATA[$top]); print "$link$topsign$counter"; } else { $total = 0; for ($i=0;$i<$SIZE;$i++) { ($counter, $dummy) = split(/`/, $DATA[$i]); $total = $total + $counter; } print $total; } exit; } for ($i=0;$i<$SIZE;$i++) { ($counter, $baselink) = split(/`/, $DATA[$i]); chop($baselink); if ($baselink eq $link) { print $counter; exit; } } print "?";
 
- - - - ->
15K
#!/usr/bin/perl ############################################################################## # Download Counter (SHOWLOAD) Version 3.5 # # Copyright 1998-99, UtilMind Solutions info@utilmind.com # # http://www.utilmind.com # # Created 3.XII.1998 Last Modified 9.V.1999 # ############################################################################## # COPYRIGHT NOTICE # # Copyright 1998-99 UtilMind Solutions. All Rights Reserved. # # # # This program is being distributed as shareware. It may be used and # # modified free of charge for personal, academic, government or non-profit # # use, so long as this copyright notice and the header above remain intact. # # Any commercial use should be registered. Please also send us an email, # # and let us know where you are using this script. By using this program # # you agree to indemnify UtilMind Solutuons from any liability. # # # # Selling the code for this program without prior written consent is # # expressly forbidden. Obtain permission before redistributing this # # program over the Internet or in any other medium. In all cases # # copyright and header must remain intact. # # # # Please check the README file for full details on installation # # and registration. # ############################################################################## # This is the counter log filename $databasefile = 'download.txt'; #################################################################### # Here you can set up the divider sign of the "top download" string # For example, if you set the ': ' sign, the string with the most # downloaded prgram will displayed as: thebestprogram.exe: 1432313 $topsign = ' - '; # Begining of the code. No modifications need below this line print "Content-Type: text/html\n\n"; # Get the input $link = $ENV{'QUERY_STRING'}; if (substr($link, 0, 1) eq '+') { $top = substr($link, 1, length($link) - 1); $showtop = 1; } open(FILE, $databasefile) || die Can't locate database file $!; @DATA = ; close(FILE); $SIZE = @DATA; if ($showtop eq 1) { if ($top ne '') { ($counter, $link) = split(/`/, $DATA[$top]); print "$link$topsign$counter"; } else { $total = 0; for ($i=0;$i<$SIZE;$i++) { ($counter, $dummy) = split(/`/, $DATA[$i]); $total = $total + $counter; } print $total; } exit; } for ($i=0;$i<$SIZE;$i++) { ($counter, $baselink) = split(/`/, $DATA[$i]); chop($baselink); if ($baselink eq $link) { print $counter; exit; } } print "?";
 
- - - - ->
11K
#!/usr/bin/perl ############################################################################## # Download Counter (SHOWLOAD) Version 3.5 # # Copyright 1998-99, UtilMind Solutions info@utilmind.com # # http://www.utilmind.com # # Created 3.XII.1998 Last Modified 9.V.1999 # ############################################################################## # COPYRIGHT NOTICE # # Copyright 1998-99 UtilMind Solutions. All Rights Reserved. # # # # This program is being distributed as shareware. It may be used and # # modified free of charge for personal, academic, government or non-profit # # use, so long as this copyright notice and the header above remain intact. # # Any commercial use should be registered. Please also send us an email, # # and let us know where you are using this script. By using this program # # you agree to indemnify UtilMind Solutuons from any liability. # # # # Selling the code for this program without prior written consent is # # expressly forbidden. Obtain permission before redistributing this # # program over the Internet or in any other medium. In all cases # # copyright and header must remain intact. # # # # Please check the README file for full details on installation # # and registration. # ############################################################################## # This is the counter log filename $databasefile = 'download.txt'; #################################################################### # Here you can set up the divider sign of the "top download" string # For example, if you set the ': ' sign, the string with the most # downloaded prgram will displayed as: thebestprogram.exe: 1432313 $topsign = ' - '; # Begining of the code. No modifications need below this line print "Content-Type: text/html\n\n"; # Get the input $link = $ENV{'QUERY_STRING'}; if (substr($link, 0, 1) eq '+') { $top = substr($link, 1, length($link) - 1); $showtop = 1; } open(FILE, $databasefile) || die Can't locate database file $!; @DATA = ; close(FILE); $SIZE = @DATA; if ($showtop eq 1) { if ($top ne '') { ($counter, $link) = split(/`/, $DATA[$top]); print "$link$topsign$counter"; } else { $total = 0; for ($i=0;$i<$SIZE;$i++) { ($counter, $dummy) = split(/`/, $DATA[$i]); $total = $total + $counter; } print $total; } exit; } for ($i=0;$i<$SIZE;$i++) { ($counter, $baselink) = split(/`/, $DATA[$i]); chop($baselink); if ($baselink eq $link) { print $counter; exit; } } print "?";
 
- - - - ->
11K
#!/usr/bin/perl ############################################################################## # Download Counter (SHOWLOAD) Version 3.5 # # Copyright 1998-99, UtilMind Solutions info@utilmind.com # # http://www.utilmind.com # # Created 3.XII.1998 Last Modified 9.V.1999 # ############################################################################## # COPYRIGHT NOTICE # # Copyright 1998-99 UtilMind Solutions. All Rights Reserved. # # # # This program is being distributed as shareware. It may be used and # # modified free of charge for personal, academic, government or non-profit # # use, so long as this copyright notice and the header above remain intact. # # Any commercial use should be registered. Please also send us an email, # # and let us know where you are using this script. By using this program # # you agree to indemnify UtilMind Solutuons from any liability. # # # # Selling the code for this program without prior written consent is # # expressly forbidden. Obtain permission before redistributing this # # program over the Internet or in any other medium. In all cases # # copyright and header must remain intact. # # # # Please check the README file for full details on installation # # and registration. # ############################################################################## # This is the counter log filename $databasefile = 'download.txt'; #################################################################### # Here you can set up the divider sign of the "top download" string # For example, if you set the ': ' sign, the string with the most # downloaded prgram will displayed as: thebestprogram.exe: 1432313 $topsign = ' - '; # Begining of the code. No modifications need below this line print "Content-Type: text/html\n\n"; # Get the input $link = $ENV{'QUERY_STRING'}; if (substr($link, 0, 1) eq '+') { $top = substr($link, 1, length($link) - 1); $showtop = 1; } open(FILE, $databasefile) || die Can't locate database file $!; @DATA = ; close(FILE); $SIZE = @DATA; if ($showtop eq 1) { if ($top ne '') { ($counter, $link) = split(/`/, $DATA[$top]); print "$link$topsign$counter"; } else { $total = 0; for ($i=0;$i<$SIZE;$i++) { ($counter, $dummy) = split(/`/, $DATA[$i]); $total = $total + $counter; } print $total; } exit; } for ($i=0;$i<$SIZE;$i++) { ($counter, $baselink) = split(/`/, $DATA[$i]); chop($baselink); if ($baselink eq $link) { print $counter; exit; } } print "?";
 
- - - - -> "De siti hevs fortuns annual list of best citis for busines"
27K
#!/usr/bin/perl ############################################################################## # Download Counter (SHOWLOAD) Version 3.5 # # Copyright 1998-99, UtilMind Solutions info@utilmind.com # # http://www.utilmind.com # # Created 3.XII.1998 Last Modified 9.V.1999 # ############################################################################## # COPYRIGHT NOTICE # # Copyright 1998-99 UtilMind Solutions. All Rights Reserved. # # # # This program is being distributed as shareware. It may be used and # # modified free of charge for personal, academic, government or non-profit # # use, so long as this copyright notice and the header above remain intact. # # Any commercial use should be registered. Please also send us an email, # # and let us know where you are using this script. By using this program # # you agree to indemnify UtilMind Solutuons from any liability. # # # # Selling the code for this program without prior written consent is # # expressly forbidden. Obtain permission before redistributing this # # program over the Internet or in any other medium. In all cases # # copyright and header must remain intact. # # # # Please check the README file for full details on installation # # and registration. # ############################################################################## # This is the counter log filename $databasefile = 'download.txt'; #################################################################### # Here you can set up the divider sign of the "top download" string # For example, if you set the ': ' sign, the string with the most # downloaded prgram will displayed as: thebestprogram.exe: 1432313 $topsign = ' - '; # Begining of the code. No modifications need below this line print "Content-Type: text/html\n\n"; # Get the input $link = $ENV{'QUERY_STRING'}; if (substr($link, 0, 1) eq '+') { $top = substr($link, 1, length($link) - 1); $showtop = 1; } open(FILE, $databasefile) || die Can't locate database file $!; @DATA = ; close(FILE); $SIZE = @DATA; if ($showtop eq 1) { if ($top ne '') { ($counter, $link) = split(/`/, $DATA[$top]); print "$link$topsign$counter"; } else { $total = 0; for ($i=0;$i<$SIZE;$i++) { ($counter, $dummy) = split(/`/, $DATA[$i]); $total = $total + $counter; } print $total; } exit; } for ($i=0;$i<$SIZE;$i++) { ($counter, $baselink) = split(/`/, $DATA[$i]); chop($baselink); if ($baselink eq $link) { print $counter; exit; } } print "?";
 
- - - - ->
7K
#!/usr/bin/perl ############################################################################## # Download Counter (SHOWLOAD) Version 3.5 # # Copyright 1998-99, UtilMind Solutions info@utilmind.com # # http://www.utilmind.com # # Created 3.XII.1998 Last Modified 9.V.1999 # ############################################################################## # COPYRIGHT NOTICE # # Copyright 1998-99 UtilMind Solutions. All Rights Reserved. # # # # This program is being distributed as shareware. It may be used and # # modified free of charge for personal, academic, government or non-profit # # use, so long as this copyright notice and the header above remain intact. # # Any commercial use should be registered. Please also send us an email, # # and let us know where you are using this script. By using this program # # you agree to indemnify UtilMind Solutuons from any liability. # # # # Selling the code for this program without prior written consent is # # expressly forbidden. Obtain permission before redistributing this # # program over the Internet or in any other medium. In all cases # # copyright and header must remain intact. # # # # Please check the README file for full details on installation # # and registration. # ############################################################################## # This is the counter log filename $databasefile = 'download.txt'; #################################################################### # Here you can set up the divider sign of the "top download" string # For example, if you set the ': ' sign, the string with the most # downloaded prgram will displayed as: thebestprogram.exe: 1432313 $topsign = ' - '; # Begining of the code. No modifications need below this line print "Content-Type: text/html\n\n"; # Get the input $link = $ENV{'QUERY_STRING'}; if (substr($link, 0, 1) eq '+') { $top = substr($link, 1, length($link) - 1); $showtop = 1; } open(FILE, $databasefile) || die Can't locate database file $!; @DATA = ; close(FILE); $SIZE = @DATA; if ($showtop eq 1) { if ($top ne '') { ($counter, $link) = split(/`/, $DATA[$top]); print "$link$topsign$counter"; } else { $total = 0; for ($i=0;$i<$SIZE;$i++) { ($counter, $dummy) = split(/`/, $DATA[$i]); $total = $total + $counter; } print $total; } exit; } for ($i=0;$i<$SIZE;$i++) { ($counter, $baselink) = split(/`/, $DATA[$i]); chop($baselink); if ($baselink eq $link) { print $counter; exit; } } print "?";
 
- - - - ->
9K
#!/usr/bin/perl ############################################################################## # Download Counter (SHOWLOAD) Version 3.5 # # Copyright 1998-99, UtilMind Solutions info@utilmind.com # # http://www.utilmind.com # # Created 3.XII.1998 Last Modified 9.V.1999 # ############################################################################## # COPYRIGHT NOTICE # # Copyright 1998-99 UtilMind Solutions. All Rights Reserved. # # # # This program is being distributed as shareware. It may be used and # # modified free of charge for personal, academic, government or non-profit # # use, so long as this copyright notice and the header above remain intact. # # Any commercial use should be registered. Please also send us an email, # # and let us know where you are using this script. By using this program # # you agree to indemnify UtilMind Solutuons from any liability. # # # # Selling the code for this program without prior written consent is # # expressly forbidden. Obtain permission before redistributing this # # program over the Internet or in any other medium. In all cases # # copyright and header must remain intact. # # # # Please check the README file for full details on installation # # and registration. # ############################################################################## # This is the counter log filename $databasefile = 'download.txt'; #################################################################### # Here you can set up the divider sign of the "top download" string # For example, if you set the ': ' sign, the string with the most # downloaded prgram will displayed as: thebestprogram.exe: 1432313 $topsign = ' - '; # Begining of the code. No modifications need below this line print "Content-Type: text/html\n\n"; # Get the input $link = $ENV{'QUERY_STRING'}; if (substr($link, 0, 1) eq '+') { $top = substr($link, 1, length($link) - 1); $showtop = 1; } open(FILE, $databasefile) || die Can't locate database file $!; @DATA = ; close(FILE); $SIZE = @DATA; if ($showtop eq 1) { if ($top ne '') { ($counter, $link) = split(/`/, $DATA[$top]); print "$link$topsign$counter"; } else { $total = 0; for ($i=0;$i<$SIZE;$i++) { ($counter, $dummy) = split(/`/, $DATA[$i]); $total = $total + $counter; } print $total; } exit; } for ($i=0;$i<$SIZE;$i++) { ($counter, $baselink) = split(/`/, $DATA[$i]); chop($baselink); if ($baselink eq $link) { print $counter; exit; } } print "?";
 
- - - - ->
13K
#!/usr/bin/perl ############################################################################## # Download Counter (SHOWLOAD) Version 3.5 # # Copyright 1998-99, UtilMind Solutions info@utilmind.com # # http://www.utilmind.com # # Created 3.XII.1998 Last Modified 9.V.1999 # ############################################################################## # COPYRIGHT NOTICE # # Copyright 1998-99 UtilMind Solutions. All Rights Reserved. # # # # This program is being distributed as shareware. It may be used and # # modified free of charge for personal, academic, government or non-profit # # use, so long as this copyright notice and the header above remain intact. # # Any commercial use should be registered. Please also send us an email, # # and let us know where you are using this script. By using this program # # you agree to indemnify UtilMind Solutuons from any liability. # # # # Selling the code for this program without prior written consent is # # expressly forbidden. Obtain permission before redistributing this # # program over the Internet or in any other medium. In all cases # # copyright and header must remain intact. # # # # Please check the README file for full details on installation # # and registration. # ############################################################################## # This is the counter log filename $databasefile = 'download.txt'; #################################################################### # Here you can set up the divider sign of the "top download" string # For example, if you set the ': ' sign, the string with the most # downloaded prgram will displayed as: thebestprogram.exe: 1432313 $topsign = ' - '; # Begining of the code. No modifications need below this line print "Content-Type: text/html\n\n"; # Get the input $link = $ENV{'QUERY_STRING'}; if (substr($link, 0, 1) eq '+') { $top = substr($link, 1, length($link) - 1); $showtop = 1; } open(FILE, $databasefile) || die Can't locate database file $!; @DATA = ; close(FILE); $SIZE = @DATA; if ($showtop eq 1) { if ($top ne '') { ($counter, $link) = split(/`/, $DATA[$top]); print "$link$topsign$counter"; } else { $total = 0; for ($i=0;$i<$SIZE;$i++) { ($counter, $dummy) = split(/`/, $DATA[$i]); $total = $total + $counter; } print $total; } exit; } for ($i=0;$i<$SIZE;$i++) { ($counter, $baselink) = split(/`/, $DATA[$i]); chop($baselink); if ($baselink eq $link) { print $counter; exit; } } print "?";
 
- - - - ->
6K
#!/usr/bin/perl ############################################################################## # Download Counter (SHOWLOAD) Version 3.5 # # Copyright 1998-99, UtilMind Solutions info@utilmind.com # # http://www.utilmind.com # # Created 3.XII.1998 Last Modified 9.V.1999 # ############################################################################## # COPYRIGHT NOTICE # # Copyright 1998-99 UtilMind Solutions. All Rights Reserved. # # # # This program is being distributed as shareware. It may be used and # # modified free of charge for personal, academic, government or non-profit # # use, so long as this copyright notice and the header above remain intact. # # Any commercial use should be registered. Please also send us an email, # # and let us know where you are using this script. By using this program # # you agree to indemnify UtilMind Solutuons from any liability. # # # # Selling the code for this program without prior written consent is # # expressly forbidden. Obtain permission before redistributing this # # program over the Internet or in any other medium. In all cases # # copyright and header must remain intact. # # # # Please check the README file for full details on installation # # and registration. # ############################################################################## # This is the counter log filename $databasefile = 'download.txt'; #################################################################### # Here you can set up the divider sign of the "top download" string # For example, if you set the ': ' sign, the string with the most # downloaded prgram will displayed as: thebestprogram.exe: 1432313 $topsign = ' - '; # Begining of the code. No modifications need below this line print "Content-Type: text/html\n\n"; # Get the input $link = $ENV{'QUERY_STRING'}; if (substr($link, 0, 1) eq '+') { $top = substr($link, 1, length($link) - 1); $showtop = 1; } open(FILE, $databasefile) || die Can't locate database file $!; @DATA = ; close(FILE); $SIZE = @DATA; if ($showtop eq 1) { if ($top ne '') { ($counter, $link) = split(/`/, $DATA[$top]); print "$link$topsign$counter"; } else { $total = 0; for ($i=0;$i<$SIZE;$i++) { ($counter, $dummy) = split(/`/, $DATA[$i]); $total = $total + $counter; } print $total; } exit; } for ($i=0;$i<$SIZE;$i++) { ($counter, $baselink) = split(/`/, $DATA[$i]); chop($baselink); if ($baselink eq $link) { print $counter; exit; } } print "?";
 
- - - - ->
8K
#!/usr/bin/perl ############################################################################## # Download Counter (SHOWLOAD) Version 3.5 # # Copyright 1998-99, UtilMind Solutions info@utilmind.com # # http://www.utilmind.com # # Created 3.XII.1998 Last Modified 9.V.1999 # ############################################################################## # COPYRIGHT NOTICE # # Copyright 1998-99 UtilMind Solutions. All Rights Reserved. # # # # This program is being distributed as shareware. It may be used and # # modified free of charge for personal, academic, government or non-profit # # use, so long as this copyright notice and the header above remain intact. # # Any commercial use should be registered. Please also send us an email, # # and let us know where you are using this script. By using this program # # you agree to indemnify UtilMind Solutuons from any liability. # # # # Selling the code for this program without prior written consent is # # expressly forbidden. Obtain permission before redistributing this # # program over the Internet or in any other medium. In all cases # # copyright and header must remain intact. # # # # Please check the README file for full details on installation # # and registration. # ############################################################################## # This is the counter log filename $databasefile = 'download.txt'; #################################################################### # Here you can set up the divider sign of the "top download" string # For example, if you set the ': ' sign, the string with the most # downloaded prgram will displayed as: thebestprogram.exe: 1432313 $topsign = ' - '; # Begining of the code. No modifications need below this line print "Content-Type: text/html\n\n"; # Get the input $link = $ENV{'QUERY_STRING'}; if (substr($link, 0, 1) eq '+') { $top = substr($link, 1, length($link) - 1); $showtop = 1; } open(FILE, $databasefile) || die Can't locate database file $!; @DATA = ; close(FILE); $SIZE = @DATA; if ($showtop eq 1) { if ($top ne '') { ($counter, $link) = split(/`/, $DATA[$top]); print "$link$topsign$counter"; } else { $total = 0; for ($i=0;$i<$SIZE;$i++) { ($counter, $dummy) = split(/`/, $DATA[$i]); $total = $total + $counter; } print $total; } exit; } for ($i=0;$i<$SIZE;$i++) { ($counter, $baselink) = split(/`/, $DATA[$i]); chop($baselink); if ($baselink eq $link) { print $counter; exit; } } print "?";
 
- - - - ->
6K
#!/usr/bin/perl ############################################################################## # Download Counter (SHOWLOAD) Version 3.5 # # Copyright 1998-99, UtilMind Solutions info@utilmind.com # # http://www.utilmind.com # # Created 3.XII.1998 Last Modified 9.V.1999 # ############################################################################## # COPYRIGHT NOTICE # # Copyright 1998-99 UtilMind Solutions. All Rights Reserved. # # # # This program is being distributed as shareware. It may be used and # # modified free of charge for personal, academic, government or non-profit # # use, so long as this copyright notice and the header above remain intact. # # Any commercial use should be registered. Please also send us an email, # # and let us know where you are using this script. By using this program # # you agree to indemnify UtilMind Solutuons from any liability. # # # # Selling the code for this program without prior written consent is # # expressly forbidden. Obtain permission before redistributing this # # program over the Internet or in any other medium. In all cases # # copyright and header must remain intact. # # # # Please check the README file for full details on installation # # and registration. # ############################################################################## # This is the counter log filename $databasefile = 'download.txt'; #################################################################### # Here you can set up the divider sign of the "top download" string # For example, if you set the ': ' sign, the string with the most # downloaded prgram will displayed as: thebestprogram.exe: 1432313 $topsign = ' - '; # Begining of the code. No modifications need below this line print "Content-Type: text/html\n\n"; # Get the input $link = $ENV{'QUERY_STRING'}; if (substr($link, 0, 1) eq '+') { $top = substr($link, 1, length($link) - 1); $showtop = 1; } open(FILE, $databasefile) || die Can't locate database file $!; @DATA = ; close(FILE); $SIZE = @DATA; if ($showtop eq 1) { if ($top ne '') { ($counter, $link) = split(/`/, $DATA[$top]); print "$link$topsign$counter"; } else { $total = 0; for ($i=0;$i<$SIZE;$i++) { ($counter, $dummy) = split(/`/, $DATA[$i]); $total = $total + $counter; } print $total; } exit; } for ($i=0;$i<$SIZE;$i++) { ($counter, $baselink) = split(/`/, $DATA[$i]); chop($baselink); if ($baselink eq $link) { print $counter; exit; } } print "?";
 
- - - - ->
15K
#!/usr/bin/perl ############################################################################## # Download Counter (SHOWLOAD) Version 3.5 # # Copyright 1998-99, UtilMind Solutions info@utilmind.com # # http://www.utilmind.com # # Created 3.XII.1998 Last Modified 9.V.1999 # ############################################################################## # COPYRIGHT NOTICE # # Copyright 1998-99 UtilMind Solutions. All Rights Reserved. # # # # This program is being distributed as shareware. It may be used and # # modified free of charge for personal, academic, government or non-profit # # use, so long as this copyright notice and the header above remain intact. # # Any commercial use should be registered. Please also send us an email, # # and let us know where you are using this script. By using this program # # you agree to indemnify UtilMind Solutuons from any liability. # # # # Selling the code for this program without prior written consent is # # expressly forbidden. Obtain permission before redistributing this # # program over the Internet or in any other medium. In all cases # # copyright and header must remain intact. # # # # Please check the README file for full details on installation # # and registration. # ############################################################################## # This is the counter log filename $databasefile = 'download.txt'; #################################################################### # Here you can set up the divider sign of the "top download" string # For example, if you set the ': ' sign, the string with the most # downloaded prgram will displayed as: thebestprogram.exe: 1432313 $topsign = ' - '; # Begining of the code. No modifications need below this line print "Content-Type: text/html\n\n"; # Get the input $link = $ENV{'QUERY_STRING'}; if (substr($link, 0, 1) eq '+') { $top = substr($link, 1, length($link) - 1); $showtop = 1; } open(FILE, $databasefile) || die Can't locate database file $!; @DATA = ; close(FILE); $SIZE = @DATA; if ($showtop eq 1) { if ($top ne '') { ($counter, $link) = split(/`/, $DATA[$top]); print "$link$topsign$counter"; } else { $total = 0; for ($i=0;$i<$SIZE;$i++) { ($counter, $dummy) = split(/`/, $DATA[$i]); $total = $total + $counter; } print $total; } exit; } for ($i=0;$i<$SIZE;$i++) { ($counter, $baselink) = split(/`/, $DATA[$i]); chop($baselink); if ($baselink eq $link) { print $counter; exit; } } print "?";
       
- - - - -> SCARICA TUTTE LE FRASI (formato ZIP)
164K
#!/usr/bin/perl ############################################################################## # Download Counter (SHOWLOAD) Version 3.5 # # Copyright 1998-99, UtilMind Solutions info@utilmind.com # # http://www.utilmind.com # # Created 3.XII.1998 Last Modified 9.V.1999 # ############################################################################## # COPYRIGHT NOTICE # # Copyright 1998-99 UtilMind Solutions. All Rights Reserved. # # # # This program is being distributed as shareware. It may be used and # # modified free of charge for personal, academic, government or non-profit # # use, so long as this copyright notice and the header above remain intact. # # Any commercial use should be registered. Please also send us an email, # # and let us know where you are using this script. By using this program # # you agree to indemnify UtilMind Solutuons from any liability. # # # # Selling the code for this program without prior written consent is # # expressly forbidden. Obtain permission before redistributing this # # program over the Internet or in any other medium. In all cases # # copyright and header must remain intact. # # # # Please check the README file for full details on installation # # and registration. # ############################################################################## # This is the counter log filename $databasefile = 'download.txt'; #################################################################### # Here you can set up the divider sign of the "top download" string # For example, if you set the ': ' sign, the string with the most # downloaded prgram will displayed as: thebestprogram.exe: 1432313 $topsign = ' - '; # Begining of the code. No modifications need below this line print "Content-Type: text/html\n\n"; # Get the input $link = $ENV{'QUERY_STRING'}; if (substr($link, 0, 1) eq '+') { $top = substr($link, 1, length($link) - 1); $showtop = 1; } open(FILE, $databasefile) || die Can't locate database file $!; @DATA = ; close(FILE); $SIZE = @DATA; if ($showtop eq 1) { if ($top ne '') { ($counter, $link) = split(/`/, $DATA[$top]); print "$link$topsign$counter"; } else { $total = 0; for ($i=0;$i<$SIZE;$i++) { ($counter, $dummy) = split(/`/, $DATA[$i]); $total = $total + $counter; } print $total; } exit; } for ($i=0;$i<$SIZE;$i++) { ($counter, $baselink) = split(/`/, $DATA[$i]); chop($baselink); if ($baselink eq $link) { print $counter; exit; } } print "?";
       
 
 

La "musica" dei Sandali
Karluozzi e la sua band dei Sandali nell'interpretazione LIVE del loro incredibile pezzo " Sono un sandalo, un sandalo-man".

- - - - -> SandaloMan - Blues 232K #!/usr/bin/perl ############################################################################## # Download Counter (SHOWLOAD) Version 3.5 # # Copyright 1998-99, UtilMind Solutions info@utilmind.com # # http://www.utilmind.com # # Created 3.XII.1998 Last Modified 9.V.1999 # ############################################################################## # COPYRIGHT NOTICE # # Copyright 1998-99 UtilMind Solutions. All Rights Reserved. # # # # This program is being distributed as shareware. It may be used and # # modified free of charge for personal, academic, government or non-profit # # use, so long as this copyright notice and the header above remain intact. # # Any commercial use should be registered. Please also send us an email, # # and let us know where you are using this script. By using this program # # you agree to indemnify UtilMind Solutuons from any liability. # # # # Selling the code for this program without prior written consent is # # expressly forbidden. Obtain permission before redistributing this # # program over the Internet or in any other medium. In all cases # # copyright and header must remain intact. # # # # Please check the README file for full details on installation # # and registration. # ############################################################################## # This is the counter log filename $databasefile = 'download.txt'; #################################################################### # Here you can set up the divider sign of the "top download" string # For example, if you set the ': ' sign, the string with the most # downloaded prgram will displayed as: thebestprogram.exe: 1432313 $topsign = ' - '; # Begining of the code. No modifications need below this line print "Content-Type: text/html\n\n"; # Get the input $link = $ENV{'QUERY_STRING'}; if (substr($link, 0, 1) eq '+') { $top = substr($link, 1, length($link) - 1); $showtop = 1; } open(FILE, $databasefile) || die Can't locate database file $!; @DATA = ; close(FILE); $SIZE = @DATA; if ($showtop eq 1) { if ($top ne '') { ($counter, $link) = split(/`/, $DATA[$top]); print "$link$topsign$counter"; } else { $total = 0; for ($i=0;$i<$SIZE;$i++) { ($counter, $dummy) = split(/`/, $DATA[$i]); $total = $total + $counter; } print $total; } exit; } for ($i=0;$i<$SIZE;$i++) { ($counter, $baselink) = split(/`/, $DATA[$i]); chop($baselink); if ($baselink eq $link) { print $counter; exit; } } print "?";
       
- - - - -> SandaloMan - Musicista 85K #!/usr/bin/perl ############################################################################## # Download Counter (SHOWLOAD) Version 3.5 # # Copyright 1998-99, UtilMind Solutions info@utilmind.com # # http://www.utilmind.com # # Created 3.XII.1998 Last Modified 9.V.1999 # ############################################################################## # COPYRIGHT NOTICE # # Copyright 1998-99 UtilMind Solutions. All Rights Reserved. # # # # This program is being distributed as shareware. It may be used and # # modified free of charge for personal, academic, government or non-profit # # use, so long as this copyright notice and the header above remain intact. # # Any commercial use should be registered. Please also send us an email, # # and let us know where you are using this script. By using this program # # you agree to indemnify UtilMind Solutuons from any liability. # # # # Selling the code for this program without prior written consent is # # expressly forbidden. Obtain permission before redistributing this # # program over the Internet or in any other medium. In all cases # # copyright and header must remain intact. # # # # Please check the README file for full details on installation # # and registration. # ############################################################################## # This is the counter log filename $databasefile = 'download.txt'; #################################################################### # Here you can set up the divider sign of the "top download" string # For example, if you set the ': ' sign, the string with the most # downloaded prgram will displayed as: thebestprogram.exe: 1432313 $topsign = ' - '; # Begining of the code. No modifications need below this line print "Content-Type: text/html\n\n"; # Get the input $link = $ENV{'QUERY_STRING'}; if (substr($link, 0, 1) eq '+') { $top = substr($link, 1, length($link) - 1); $showtop = 1; } open(FILE, $databasefile) || die Can't locate database file $!; @DATA = ; close(FILE); $SIZE = @DATA; if ($showtop eq 1) { if ($top ne '') { ($counter, $link) = split(/`/, $DATA[$top]); print "$link$topsign$counter"; } else { $total = 0; for ($i=0;$i<$SIZE;$i++) { ($counter, $dummy) = split(/`/, $DATA[$i]); $total = $total + $counter; } print $total; } exit; } for ($i=0;$i<$SIZE;$i++) { ($counter, $baselink) = split(/`/, $DATA[$i]); chop($baselink); if ($baselink eq $link) { print $counter; exit; } } print "?";
       
- - - - -> SandaloMan - Ska 346K #!/usr/bin/perl ############################################################################## # Download Counter (SHOWLOAD) Version 3.5 # # Copyright 1998-99, UtilMind Solutions info@utilmind.com # # http://www.utilmind.com # # Created 3.XII.1998 Last Modified 9.V.1999 # ############################################################################## # COPYRIGHT NOTICE # # Copyright 1998-99 UtilMind Solutions. All Rights Reserved. # # # # This program is being distributed as shareware. It may be used and # # modified free of charge for personal, academic, government or non-profit # # use, so long as this copyright notice and the header above remain intact. # # Any commercial use should be registered. Please also send us an email, # # and let us know where you are using this script. By using this program # # you agree to indemnify UtilMind Solutuons from any liability. # # # # Selling the code for this program without prior written consent is # # expressly forbidden. Obtain permission before redistributing this # # program over the Internet or in any other medium. In all cases # # copyright and header must remain intact. # # # # Please check the README file for full details on installation # # and registration. # ############################################################################## # This is the counter log filename $databasefile = 'download.txt'; #################################################################### # Here you can set up the divider sign of the "top download" string # For example, if you set the ': ' sign, the string with the most # downloaded prgram will displayed as: thebestprogram.exe: 1432313 $topsign = ' - '; # Begining of the code. No modifications need below this line print "Content-Type: text/html\n\n"; # Get the input $link = $ENV{'QUERY_STRING'}; if (substr($link, 0, 1) eq '+') { $top = substr($link, 1, length($link) - 1); $showtop = 1; } open(FILE, $databasefile) || die Can't locate database file $!; @DATA = ; close(FILE); $SIZE = @DATA; if ($showtop eq 1) { if ($top ne '') { ($counter, $link) = split(/`/, $DATA[$top]); print "$link$topsign$counter"; } else { $total = 0; for ($i=0;$i<$SIZE;$i++) { ($counter, $dummy) = split(/`/, $DATA[$i]); $total = $total + $counter; } print $total; } exit; } for ($i=0;$i<$SIZE;$i++) { ($counter, $baselink) = split(/`/, $DATA[$i]); chop($baselink); if ($baselink eq $link) { print $counter; exit; } } print "?";
       
Per conoscere la storia e le attivita' dei Sandali: clicca qui
 

 


| Home | Candid Web | Scherzi dei VIP | Scherzi Telefonici | Frasi Audio |
| E-Scherzi | SMS Divertenti | Loghi e Suonerie |Scherzi PC |
|
Cartoline Virtuali | Scherzi Off-Line | Links | Chi Siamo |



Copyright 2001,2002 KARLUOZZI.COM. All Rights Reserved.