Perl find lowest divisible number

This Perl Script find the lowest, divisible number from 1 to 10:

use strict;
my ($number,$check) = (0,0);
    last unless($check);
print "$number\n";

The result is 2520.

4 thoughts on “Perl find lowest divisible number”

  1. Superb blog you have here but I was curious if you knew of any discussion boards that cover the
    same topics discussed in this article? I’d really like to be a part of community where I can get advice from other experienced individuals
    that share the same interest. If you have any recommendations, please
    let me know. Cheers!

  2. Helpful information. Lucky me I found your site unintentionally, and I’m surprised why this twist of
    fate did not happened earlier! I bookmarked it.

  3. Howdy are using WordPress for your blog platform? I’m new to the blog world but
    I’m trying to get started and create my own. Do you require any
    coding expertise to make your own blog? Any help would be really appreciated!

Leave a Reply

Your email address will not be published.

6 + six =