Re: Need help with a programming problem

2013-10-03 Thread Shlomi Fish
Hi Uri, On Wed, 02 Oct 2013 23:44:04 -0400 Uri Guttman wrote: > On 10/02/2013 08:56 PM, Rob Dixon wrote: > > On 03/10/2013 01:39, Uri Guttman wrote: > >> > >> I do recommend you try to use File::Slurp to read in and write out your > >> files. > > > > It would help a lot if you declared your inte

Re: Kind Help

2013-10-03 Thread Shlomi Fish
Hi Vino, On Fri, 4 Oct 2013 09:12:20 +0530 Frank Vino wrote: > Hi All, > > > Here is my request, > > I would like to hit my firewall with IP address and Domain users for 100 > Users. I have firewall and active directory(100 Users) but i do not have > 100 Client PC's. I am planning to do a SSH

Re: Not following the action here.

2013-10-03 Thread Harry Putnam
Jim Gibson writes: [...] > For debugging purposes, I usually declare a variable at the top of my program: > > my $debug = 1; > > Then I sprinkle print statements controlled by this variable throughout my > program: > > print "\$_=$_\n" if $debug; > > When my program is debugged and ready to

Re: Quizzing students with Perl

2013-10-03 Thread John W. Krahn
Rick T wrote: The code below (server addresses Xed out for security) has been used on my website for years, but it does seem to misbehave on rare occasions, so I have a few questions on how I might improve it. I apologize in advance for my amateurish coding; I’m a high school teacher who cannot

Kind Help

2013-10-03 Thread Frank Vino
Hi All, Here is my request, I would like to hit my firewall with IP address and Domain users for 100 Users. I have firewall and active directory(100 Users) but i do not have 100 Client PC's. I am planning to do a SSH/Remote session to hit the firewall with IP address and Doamin Users. I would au

Re: I'm doing something stupid

2013-10-03 Thread Rob Dixon
shawn wilson wrote: >From position 0 to 7 should be whatever GREP_COLOR export is defined >as. There might be issues with how I'm doing that but my main issue (I >think) is how I'm looping (and/or how I'm using substr). > >#!/usr/bin/perl > >use strict; >use warnings; > >use Data::Dumper; > >my $l

I'm doing something stupid

2013-10-03 Thread shawn wilson
>From position 0 to 7 should be whatever GREP_COLOR export is defined as. There might be issues with how I'm doing that but my main issue (I think) is how I'm looping (and/or how I'm using substr). #!/usr/bin/perl use strict; use warnings; use Data::Dumper; my $line = 'foo bar baz ball'; my $ma

Re: Hebrew

2013-10-03 Thread D.Edmons
Correction. Some widgets (e.g. List) have correct vowelization; others do not. On 10/03/2013 04:18 PM, D.Edmons wrote: Okay, 5.18.1 appears to have correct/improved vowelization, but has all the characters in left-to-right order still. The unwary programmer won't always know when his/her UTF-

Re: Hebrew

2013-10-03 Thread D.Edmons
Okay, 5.18.1 appears to have correct/improved vowelization, but has all the characters in left-to-right order still. The unwary programmer won't always know when his/her UTF-8 string has Hebrew, English, or whatever. The subsystem should be placing these in the correct order. Has anybody els

Re: Mojolicious::Lite and Net::Stripe

2013-10-03 Thread Peter Ezetta
I actually just discovered with the help of a few folks in IRC that this seems to work fine with JSON::XS installed, but not JSON::PP. I'm just going to run with JSON::XS for now, and open a ticket for the module maintainer. Thank you much for your response. Peter On Oct 3, 2013, at 3:14 PM,

Re: Quizzing students with Perl

2013-10-03 Thread David Christensen
On 10/03/13 07:59, Rick T wrote: The code below (server addresses Xed out for security) has been used on my website for years, but it does seem to misbehave on rare occasions, so I have a few questions on how I might improve it. The problem is that you have a program, but what you really wan

Re: Not following the action here.

2013-10-03 Thread Jim Gibson
On Oct 3, 2013, at 11:51 AM, Harry Putnam wrote: > Uri Guttman writes: > > [...] > >>> , >>> | script.pl ./td >>> | $eperm = (stat(./td/./td))[2] >>> | $eperm = (stat(./td/./td/three))[2] >>> | $eperm = (stat(./td/./td/one))[2] >>> | $eperm = (stat(./td/./td/two))[2] >>> ` >>> >>> Tha

Mojolicious::Lite and Net::Stripe

2013-10-03 Thread Peter Ezetta
Hello All, I am currently messing around with my first Mojolicious application, and am attempting to get a credit card to process with Stripe using the Net::Stripe module. It appears that one of the attributes is failing to pass it's constraint, however I am unsure if the problem lies with my

Re: Not following the action here.

2013-10-03 Thread Harry Putnam
Uri Guttman writes: [...] >> , >> | script.pl ./td >> | $eperm = (stat(./td/./td))[2] >> | $eperm = (stat(./td/./td/three))[2] >> | $eperm = (stat(./td/./td/one))[2] >> | $eperm = (stat(./td/./td/two))[2] >> ` >> >> That will be a non-working comparision > > in your original code and out

Re: Not following the action here.

2013-10-03 Thread John W. Krahn
Harry Putnam wrote: "John W. Krahn" writes: First, thanks for the input. [...] my $exe = 33261; Or: my $exe = 0100755; Where does that come from? And it appears some kind of conversion must take place. If you print $exe right after assigning it 0100755, it still shows 33261. 010075

Re: Hebrew

2013-10-03 Thread D.Edmons
I'm rebuilding the latest stable release now. Will report as bug if it is still there. On 10/03/2013 10:23 AM, D.Edmons wrote: Shlomi, Thanks for the reply. I understand that there's better support elsewhere, but often the learning curve is proportionally higher. I chose perl/Tk for this reas

Re: Hebrew

2013-10-03 Thread D.Edmons
Shlomi, Thanks for the reply. I understand that there's better support elsewhere, but often the learning curve is proportionally higher. I chose perl/Tk for this reason. I currently use `leafpad` which suffices for normal editing tasks. However, I'm wanting to put together a very simple H

Re: Not following the action here.

2013-10-03 Thread Uri Guttman
On 10/03/2013 12:29 PM, Harry Putnam wrote: Uri Guttman writes: [...] find( sub { return unless -f; $eperm = (stat($File::Find::name))[2]; you don't have the dir there so the file isn't found by stat. you need "$f/$File::Find::name" [...] print $File::Find::name .

Re: Not following the action here.

2013-10-03 Thread Harry Putnam
"John W. Krahn" writes: First, thanks for the input. [...] >> my $exe = 33261; > > Or: > > my $exe = 0100755; Where does that come from? And it appears some kind of conversion must take place. If you print $exe right after assigning it 0100755, it still shows 33261. >> my $eperm; > > You do

Re: Not following the action here.

2013-10-03 Thread Harry Putnam
Uri Guttman writes: [...] >> find( sub { >> return unless -f; >> $eperm = (stat($File::Find::name))[2]; > > you don't have the dir there so the file isn't found by stat. > you need "$f/$File::Find::name" > [...] > >>print $File::Find::name . "\n"; > > that only prints the fil

Quizzing students with Perl

2013-10-03 Thread Rick T
The code below (server addresses Xed out for security) has been used on my website for years, but it does seem to misbehave on rare occasions, so I have a few questions on how I might improve it. I apologize in advance for my amateurish coding; I’m a high school teacher who cannot afford hiring

Re: Hebrew

2013-10-03 Thread Shlomi Fish
Hi Dale, On Thu, 03 Oct 2013 00:37:14 -0700 "D.Edmons" wrote: > Hi, > > I'm new to perl, but have been programming for a couple decades--self > taught. > > 1) I've gotten perlTK to display two Paned windows, open two utf-8 > files, and display them. However, the Hebrew vowels are not displa

Hebrew

2013-10-03 Thread D.Edmons
Hi, I'm new to perl, but have been programming for a couple decades--self taught. 1) I've gotten perlTK to display two Paned windows, open two utf-8 files, and display them. However, the Hebrew vowels are not displayed correctly. The vowels are displayed at the cursor position following t