The group you are posting to is a Usenet group. Messages posted to this group will make your email address visible to anyone on the Internet.
Your reply message has not been sent.
Your post was successful
 |
Newsgroups: comp.lang.perl.misc
From: Bill H <b...@ts1000.us>
Date: Fri, 16 May 2008 07:05:39 -0700 (PDT)
Local: Fri, May 16 2008 10:05 am
Subject: Re: write 10 files
On May 16, 5:45 am, "Ela" <e...@yantai.org> wrote:
> The following codes are not accepted by Perl and even string concatenation Unless $size is always evenly divisible by 10000 then $i will not be > doesn't work. Any suggestions? > #!/usr/bin/perl > $infile = $ARGV[0]; > } > $i = $size/10000; the number you expect it to be (use $i = int($size/10000); instead) and it will never print into one of the file handles you have open. (for example, $size = 11,000 then $i = 11000/10000 will equal 1.1, not the "1" you expect.) Bill H You must Sign in before you can post messages.
To post a message you must first join this group.
Please update your nickname on the subscription settings page before posting.
You do not have the permission required to post.
| |||||||||||||