Ask Experts Questions for FREE Help !
Ask

Search:

Type: Posts; User: nobody123

Search: Search took 0.00 seconds.

  1. Is it working the way you want? Do you have...

    Is it working the way you want?

    Do you have any other questions?

    You could add this to make debugging easier.

    use Getopt::Std;
    getopts('d', \%opts);
    $debug = 0;
    foreach (keys %opts) {
  2. I am not sure why you are using 10**?? For your...

    I am not sure why you are using 10**?? For your
    max and min values.



    print "First number:\n";
    my $dig1 = <>;
    chomp($dig1);
    print "Second number:\n";
    my $dig2 = <>;
  3. The last one did not work for an odd number of...

    The last one did not work for an odd number of digits.
    This one works well. I think it is pretty cool.



    #! /usr/bin/perl -w

    use strict;
    my ($A, $B, $P, $Max, $i );
  4. This should look better. I didn't know there was...

    This should look better. I didn't know there was a code button.
    I am new at askmehelpdesk.com



    #! /usr/bin/perl -w

    use strict;
    my ($A, $B, $P, $Max, $i );
  5. substr EXPR,OFFSET,LENGTH 1. my $s = "The...

    substr EXPR,OFFSET,LENGTH

    1. my $s = "The black cat climbed the green tree";
    2. my $color = substr $s, 4, 5; # black
    3. my $middle = substr $s, 4, -11; # black cat climbed the
    4....
  6. Try this. This is a more efficient way to do it....

    Try this. This is a more efficient way to do it.
    If you want to see all the palindromes, then comment out this line:
    next if ($P <= $max) ;

    #! /usr/bin/perl -w

    use strict;
    my ($L, $A, $B,...
  7. First off, instead of starting with 100 x 100, I...

    First off, instead of starting with 100 x 100, I would start with 999 x 999 and work my way down.

    for ($A = 999 ; $A >= 100 ; $A--)

    Secondly, I think the third argument of your substr command...
Results 1 to 7 of 7