Hi, On Tue, 21 Feb 2012 23:47:39 +0400 Vyacheslav <agapov.sl...@gmail.com> wrote:
> Hello. > > I'm new in perl and have many questions. > > This my first programm. > > #!/usr/bin/perl > > use strict; > use warnings; > That's good. > my $number = 0; > my $_ = 0; You shouldn't use my with "$_" and you should avoid using $_ in serious programs as much as possible because it can get devastated too easily. > print "Enter number:"; An English typo "Enter number" should be "Enter a number". > chomp($number = <>); > if ( $number = /[0-9]/) { This is wrong. You should use "=~" (the pattern match operator) instead of "=" (the assignment one). A non-bound /.../ will match against $_. You may also wish to use \d instead of [0-9] (though this will also match the digits used in Arabic, etc.) > print "you number $number\n" 1. Always include semicolons - even at end of blocks. That way your code won't emit many spurious errors if you add more statements later. 2. You should write "Your number is $number.\n"; (Grammar nitpick). Regards, Shlomi Fish -- ----------------------------------------------------------------- Shlomi Fish http://www.shlomifish.org/ My Aphorisms - http://www.shlomifish.org/humour.html Judaism: God knows you will do shit, does nothing to prevent it, but makes you take the blame for it anyways. Please reply to list if it's a mailing list post - http://shlom.in/reply . -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/