Help for this page

Select Code to Download


  1. or download this
    my ($f1, $f2, $f3, $f4, $f5);
my $c = <>; # get number
...
   ... compute factor ...
   return ($factor, $num/$factor);
}
  2. or download this
    my $f1;
my $c = <>; # get number
...
   ... compute factor ...
   return ($factor, $num/$factor);
}
  3. or download this
    my $f1;
my $c = <>; # get number
...
   ... compute factor ...
   return ($factor, $num/$factor);
}