> "SB" == Steve Bertrand writes:
SB> $ping_result =~ m{ .* id=(\d+) }xms;
that will match 'grid=123' or 'foo=34 noid=123' etc. the .* is allowing
anything before the id. it may work here as no field other than id ends
in 'id' but it is a poor regex. don't use *. unless you mean to grab
so
> "CS" == Curt Shaffer writes:
>>
>>
Uri> no need for the = () as all arrays are created empty.
CS> I wasn't sure if strict would bark or not, so I figured better safe than
sorry.
>>
Uri> someone told you that le is wrong for numeric comparison. and WHAT do
>> you think is
> "CS" == Curt Shaffer writes:
Uri> post the output line from that command. do not let your emailer mung it
>> or word wrap it. show the part you want to extract out. there may be
>> easier ways to get it with a regex and not with split.
CS> I think you may be right. I would like to
Curt Shaffer wrote:
>>
>>
>> Uri> post the output line from that command. do not let your emailer mung it
>> or word wrap it. show the part you want to extract out. there may be
>> easier ways to get it with a regex and not with split.
>
> I think you may be right. I would like to pull the numeric
>
>
>
> Uri> post the output line from that command. do not let your emailer mung it
> or word wrap it. show the part you want to extract out. there may be
> easier ways to get it with a regex and not with split.
I think you may be right. I would like to pull the numerics out from the id=
sec
>
>
> Uri> no need for the = () as all arrays are created empty.
I wasn't sure if strict would bark or not, so I figured better safe than sorry.
>
> Uri> someone told you that le is wrong for numeric comparison. and WHAT do
> you think is in $_ there? you never explicitly set it. it may have so
> "CS" == Curt Shaffer writes:
CS> #!/usr/bin/perl
CS> use warnings;
CS> use strict;
CS> my $hping;
CS> my $hping_compare;
CS> my @hping_array = ();
no need for the = () as all arrays are created empty.
CS> for (1 .. 5){
CS> $hping = `sudo hping3 www.microsoft.com -
> "CS" == Curt Shaffer writes:
URI> still no warnings and strict. USE THEM.
>>
>> do it now. add them and declare all your variables. it will save your
>> ass.
>>
CS> I am running -w when I run the code.
>>
URI> what is the \ doing there. it makes the space into a space.
On Feb 9, 2010, at 10:10 AM, Steve Bertrand wrote:
> Uri Guttman wrote:
>
>> CS> foreach (@hping_array){
>>
>> foreach my $ping ( @hping_array){
>
> Uri showed right above how to avoid using $_. eg instead of:
>
I didn't read/understand that fully as to the problem at hand. I apologize.
>
Uri Guttman wrote:
> CS> foreach (@hping_array){
>
> foreach my $ping ( @hping_array){
Uri showed right above how to avoid using $_. eg instead of:
foreach ( @hping_array ) {
$_ + 10;
#...60 lines of code
print "$_\n";
}
do:
for my $ping_result ( @hping_array ) {
>> SB> # ignoring the fact that you were advised to use named variables
>> # instead of $_ where possible, here is one way to do it:
I do not see how I can get away from using $_ because each iteration through
the loop will be a different variable and thus a different array element. This
is why
Steve Bertrand wrote:
> Curt Shaffer wrote:
>> #!/usr/bin/perl
>> use warnings;
>> use strict;
>> my $hping;
>> my $hping_compare;
>> my @hping_array = ();
>>
>>
>> for (1 .. 5){
>>
>> $hping = `sudo hping3 www.microsoft.com -S -p 80 -c 1`;
>> push @hping_array,(split'\ ',$hping)[15
Curt Shaffer wrote:
> #!/usr/bin/perl
> use warnings;
> use strict;
> my $hping;
> my $hping_compare;
> my @hping_array = ();
>
>
> for (1 .. 5){
>
> $hping = `sudo hping3 www.microsoft.com -S -p 80 -c 1`;
> push @hping_array,(split'\ ',$hping)[15];
> }
> $hping_compare = $hping_
#!/usr/bin/perl
use warnings;
use strict;
my $hping;
my $hping_compare;
my @hping_array = ();
for (1 .. 5){
$hping = `sudo hping3 www.microsoft.com -S -p 80 -c 1`;
push @hping_array,(split'\ ',$hping)[15];
}
$hping_compare = $hping_array[0];
foreach (@hping_array){
if ($_ le $h
> URI> still no warnings and strict. USE THEM.
>
> do it now. add them and declare all your variables. it will save your
> ass.
>
I am running -w when I run the code.
>
> URI> what is the \ doing there. it makes the space into a space. it is not
> seen by split or the regex engine.
This is t
> "CS" == Curt Shaffer writes:
CS> #!/usr/bin/perl -w
still no warnings and strict. USE THEM.
do it now. add them and declare all your variables. it will save your
ass.
CS> for (1 .. 5){
CS> my $hping = `sudo hping3 www.microsoft.com -S -p 80 -c 1`;
CS> push @hpin
At 9:17 PM -0500 2/8/10, Curt Shaffer wrote:
Ok. So again, thanks for getting me on the right track. I am now at
my compare routine. This is where I cannot figure out how to compare
within 100.
My first instinct is to write something like the following:
#!/usr/bin/perl -w
for (1 .. 5){
I a
Ok. So again, thanks for getting me on the right track. I am now at my compare
routine. This is where I cannot figure out how to compare within 100. My first
instinct is to write something like the following:
#!/usr/bin/perl -w
for (1 .. 5){
my $hping = `sudo hping3 www.microsoft.com -S
Thanks for the clue. I have narrowed some things down. The counter is much
nicer. I just need to get a better split I think as I'm not getting the
grouping I would like.
On Feb 8, 2010, at 7:19 PM, Uri Guttman wrote:
>> "CS" == Curt Shaffer writes:
>
> CS> OK. So I have tried some things
Thanks Jim. I see my error now. I didn't realize you could just backtick in a
for like that.
On Feb 8, 2010, at 7:06 PM, Jim Gibson wrote:
> On 2/8/10 Mon Feb 8, 2010 3:55 PM, "Curt Shaffer"
> scribbled:
>
>> OK. So I have tried some things. I guess the largest issue that I can't find
>> an
> "CS" == Curt Shaffer writes:
CS> OK. So I have tried some things. I guess the largest issue that I
CS> can't find an answer for elsewhere is how to evaluate variables to
CS> be >, = or <100 in one evaluation. Before I get there, obviously
CS> I need to get the variables.
CS> @hp
On 2/8/10 Mon Feb 8, 2010 3:55 PM, "Curt Shaffer"
scribbled:
> OK. So I have tried some things. I guess the largest issue that I can't find
> an answer for elsewhere is how to evaluate variables to be >, = or <100 in one
> evaluation.
>
> Before I get there, obviously I need to get the variabl
OK. So I have tried some things. I guess the largest issue that I can't find an
answer for elsewhere is how to evaluate variables to be >, = or <100 in one
evaluation.
Before I get there, obviously I need to get the variables.
Here is what I am trying to do for that:
@hping_array = ();
$hcount
> "CS" == Curt Shaffer writes:
CS> I'm trying to figure out a way to compare a couple values to see
CS> if they are sequential or not. I'm running a for loop and
CS> grabbing a value and setting a variable through each iteration. At
CS> the end I would like to examine the results and
I'm trying to figure out a way to compare a couple values to see if they are
sequential or not.
I'm running a for loop and grabbing a value and setting a variable through each
iteration. At the end I would like to examine the results and see if they are
sequential or not.
If the values are l
25 matches
Mail list logo
