Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options

Re^2: mail question and book, and code

by Raymond (Novice)
on May 06, 2013 at 18:37 UTC ( #1032367=note: print w/replies, xml ) Need Help??

in reply to Re: mail question and book, and code
in thread mail question and book

Thanks it's a new begining, and i don't have the Art to debug, as some of you have, in this post the 2 firts programs are solved, there are 3 more pls. Iam trying to get a collection of programs, that a person practise it, and copied those same programs one person can learn how to Perl. If someone knows a site with lots of samples, don't be shy, tell me.

Replies are listed 'Best First'.
Re^3: mail question and book, and code
by marto (Archbishop) on May 06, 2013 at 18:43 UTC

    If you had bothered to click the links I provided you'd have all the resources you need to get started.

      I didn't notice that is has links, thanks. Best Regards Ray
Re^3: mail question and book, and code
by Laurent_R (Canon) on May 06, 2013 at 23:11 UTC

    OK, for the third, probably one single little change: declare $DELAY with the my function:

    #!/usr/bin/perl -w use strict; use warnings; # slowcat - emulate a slow line printer # usage: slowcat -DELAY files ... my $DELAY = ($ARGV[0] =~ /^-(.\d+)/) ? (shift, $1) : 1; $| = 1; while (<>) { for (slit(//)) { print; select(undef,undef,undef, 0.005 * $DELAY); } }

    The same correction will apply to most of your other problems.

    And BTW, yes, I was fortunate enough to be born with the art of debugging Perl, I was doing that all the time in my cradle or while drinking milk from the breast of my mother (even though this was 30 years before Larry Wall invented Perl, but I knew it all already), but if it is not your case, too bad, you'll have to learn it the hard way: by doing it yourself again and again. You can get some help, and I am ready to help you again on the programs you have shown, but at one point, you really have to do it yourself.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1032367]
[usemodperl]: sorry veltro, venting...
[usemodperl]: (is that wrong marto?)
[aitap]: usemodperl: maybe it's you who has changed
[marto]: demonstrably yes, since you claim to want a safe space, your definition for which seems to be a place where you can name call, make things up or otherwise post without being challenged
[usemodperl]: no that's not it at all, meant safe for perl people, to not be hounded by weirdos obsessed with things like... whitespace :-)
[choroba]: I'm definitely not obsessed with whitespace, I rate myself among Perl people, and I haven't noticed any hounding
[marto]: "no it's not that"...."weirdos "...
[marto]: List EXE_FILES installed by CPAN so a couple of people suggest that your code looks obfuscated. I'd have to ageree, from the perspective of those who can't follow all of that one liner, it doesn't read well
Veltro is a weirdo, obsessed with whitespace
[marto]: to use the word "obsession" when so few people have said so little about it is grasping at staws

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (7)
As of 2018-06-24 15:58 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (126 votes). Check out past polls.