Search results for query: *

thanks for taking the time to explain your script!

thanks, now I am not clear on how this part works? What is the $socket=IO::Socket::INET ->new(%host) part doing?? And what does ${host}:${port} represent??, Are these aliases?? if($socket = IO::Socket::INET->new(%host)){ print "Connected to $host on port $port\n"; print...

How would you do the same thing in checking several IP addresses?? I tried putting the $host variable in an array but couldnt get it to work. @host = "111.111.111.111 454.333.335.333 334.333.334.333"; # or an IP address

Please advise what \r stands for??

Greg, I tried running your script and got the following messages: Checking File Systems Mount Total Used Free Used% Test diskmon: xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx xx: not found awk: syntax...

Please explain what RAID is and what they do? Are they just big storage devices that are hooked up to servers???

I got the output I wanted and was wondering it this is the best way to do it?? $db = 'aaa.txt'; open(FILE, &quot;$db&quot;) or die &quot;File does not open: $!&quot;; while(<FILE>) { if ($weight = (/\b(weight)(\s+)(\d+)/)) { print $1 . $2 . $3; } } close FILE;

Still no luck I tried: print $weight; print $_; print FILE; and none of the above printed out weight 2. MOst of the print outs were of the whole file such as: --- Garbage Line --- and has weight 2kg with blah blah --- Garbage Line --- Any other suggestions??

Please advise how I would print results to the screen? I can only get it to print the whole file contents instead of printing out the variable and number 2. $db = 'tex.doc'; open(FILE, &quot;<$db&quot;) or die &quot;File does not open: $!&quot;; #@data = (<DATA>); #close (DATA)...

Thanks for the detailed answers.

1 012345 Literature Book Pkged with Audio $var =~ s/\A(\d+) +(.*)\Z/$1\t$2/; Please explain what this is doing? It is starting with beginning of string (which is the number 1?) and then what is the +(.*) doing? I know the \Z is ending the string. But what part of the string is it ending??

Still not familiar with the passing of references. I will need to start reading about references and structures.

Can you advise what the $a and $b represent in this script. I understand the splitting up of data and sorting but I am lost with these two variables. Are you storing the three fields in each one? @field1 = split (/\s+/,$a); @field2 = split (/\s+/,$b);

Thanks for explaining the details about C++ and Perl. I am just learning both and just wondering what other Perl and C++ books you recommend? Also how many years did it take for you to get comfortable with both languages? I tried the Learning perl and perl cookbook but want something with...

I am in the process of learning Perl and C++. Can you use Perl alot with Windows? And can you use C++ and Perl in Unix environment. If so how would the two differ?

fergmj, Send as much as you can (or edit your corporation words etc.. it if needed) so I can at least understand it. My email is teser3@hotmail.com Thanks!

fergmj, Can you post your script? I need to do the same thing as you are doing.

Krunek, Please disregard my last question...I might not need to worry about it. Can you explain more about your code such as: length > lnLen { for (i = 1; i <= NF; i ++) { if (i > 1) { row = tmpRow #WHAT IS HAPPENING HERE? tmpRow = tmpRow &quot; &quot; $i #WHAT IS THIS...

Krunek, Thanks for the explanation. This works great for me, but what if I have HTML tags such as <longtag name that cant be split in two lines> or other tags that I dont want to seperate into two lines. Basically keep all charaters the same length as what you wrote in your awk but leave...

Krunek, Can you explain what your script does? Three