fe a little easier.
Anyway, I'm sorry to say that I think that if you want this script to work
and be safe, you're going to have to rewrite it, at least partially.
Tagore Smith
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
BTW, one thing you might consider is that there may be duplicate email
addresses that differ only in case. You might want to check for that.
Tagore Smith
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
> my @sorted = sort(@slurped); # Create a sorted list
> my $i;
> my $j;
> foreach ($i = 0; $i <= @sorted; $i++) {
>
> chomp($i);
> $j = $i++; # Only finds 1 address beyond $i
>
> if ($sorted[$i] =~ /$j/) # Compare this line w/next line
> {
> next; # If i
eople will
find it unclear only because of a background in C. I think people may also
find it unclear because of a background in functional languages (whence map
comes). I like map to be free of side effects even when used in a non-void
context (particularly then actually- at least when you use it in a
drieux wrote:
> On Saturday, May 18, 2002, at 07:09 , Tagore Smith wrote:
>
> > You're on the right track. Try something like this:
> >
> > my @array=("aaa", "aaa", "bbb", "bbb", "aaa", "ccc",
ng foreach $item(@array) {
> and here to increase a counter, but finally, I couldn't solve it.
You're on the right track. Try something like this:
my @array=("aaa", "aaa", "bbb", "bbb", "aaa", "ccc", "aaa", "bbb", "ccc")
my %hash;
foreach my $item (@array){
$hash{$item}++;
}
Tagore Smith
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
tf "%.2f", $var1;
print $roundedvar;
Tagore Smith
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
olutions- maybe someone with a lot of esperience doing file uploads
through cgi will be willing to. Be very careful about putting a file upload
script on a public webserver- make sure that someone who really knows what
they're doing has a good look at it before you do.
Tagore Smith
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
t; Thank you for any help.
> I am trying to learn this but I just can't.
It takes time, especially if Perl is your first programming language. But
reading the docs helps. See perldoc -f read.
Tagore Smith
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
the code where @Draw is initialized it's hard to know,
but if you are doing one of the above, that's the problem.
Hope that helps.
Tagore Smith
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
interpolation inside double quotes?
print @Array; and print "@Array";. are different. The second will
separate the items with spaces.
Tagore Smith
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
ms (within your browser) at:
http://www.perl.com/CPAN/modules/00modlist.long.html
Tagore Smith
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
at displays the available filenames,
but submits the corresponding integer as the cgi parameter.
Tagore Smith
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
13 matches
Mail list logo
