Pequeńo parche para un for extrańo.
Logged In: NO
--- esms.old Wed Dec 19 23:03:48 2001 +++ esms Tue Jan 29 10:32:34 2002 @@ -299,8 +299,8 @@ sub help{ printf "esms $version\n"; print "Uso: esms [-s --server servidor] [--license] [-r --reverse] <telefono|alias>\n\n"; - for(my $n=1;$n<=scalar(@plugs);$n++){ - print "\t-s ",$plugs[$n-1][0],": ",$plugs[$n-1][1],"\n"; + for(my $n=0;$n<scalar(@plugs);$n++){ + print "\t-s ",$plugs[$n][0],": ",$plugs[$n][1],"\n"; } print "\nEjemplo:\n"; print " fortune -s | esms -s movistar Linus\n";
Logged In: YES user_id=3101
Supongo que todos los que aprendimos a programar en C contamos desde 0 ;-) (esa parte del cdigo ya no s si era ma o no)
Log in to post a comment.
Logged In: NO
--- esms.old Wed Dec 19 23:03:48 2001
+++ esms Tue Jan 29 10:32:34 2002
@@ -299,8 +299,8 @@
sub help{
printf "esms $version\n";
print "Uso: esms [-s --server servidor] [--license]
[-r --reverse] <telefono|alias>\n\n";
- for(my $n=1;$n<=scalar(@plugs);$n++){
- print "\t-s ",$plugs[$n-1][0],":
",$plugs[$n-1][1],"\n";
+ for(my $n=0;$n<scalar(@plugs);$n++){
+ print "\t-s ",$plugs[$n][0],":
",$plugs[$n][1],"\n";
}
print "\nEjemplo:\n";
print " fortune -s | esms -s movistar Linus\n";
Logged In: YES
user_id=3101
Supongo que todos los que aprendimos a programar en C contamos desde 0 ;-) (esa parte del cdigo ya no s si
era ma o no)