Search results for query: *

...options for LWP. $ua->timeout(15); # Only try for 15 seconds to get the image. $ua->max_size(1024*600); # Limit how much data we pull down $ua->protocols_allowed([ 'http', 'https', 'ftp' ]); # Only allow web URIs...

...@dimensions); print "Icon Size: $dims\n"; my ($w,$h) = @dimensions; # How many bytes will make up this icon? w*h*4 bytes my $datasize = $w * $h * 4; # 4 bytes for RGBA if ($w > 128) { # skip big icons $value =...

...long) Next 4 were the height (unsigned long) Followed by 4 bytes for each pixel in the image, in RGBA format, until every pixel in the width*height*4 is exhausted, and then the following icon's data would start. I went through 3 different image generation modules before I got some code that...

Just returned the Netgear got a Belkin Share Max Wireless Router. It claims to have similar features to the Netgear one and was a similar price, but the Belkin actually does its job. :P I get 16 MB/s speeds from speedtest.net now over wifi from the Belkin router. Kirsle.net | My personal...

JMoore64: the QoS settings aren't enabled. I called Netgear's tech support about the new router and he had me change a few settings but it didn't make it any better so he just told me to return it and get a different model. -_- The internet speed is fine when I connect anything to the modem...

Okay, this has escalated to the realm of ridiculous... I went to Best Buy and got a new router, it's a Netgear N600 Wireless Dual Band Router "High Performance", up to 300 MB/s it says, ran me $94. I got home, connected it to my network, Internet was working through it out-of-box so before I...

Ah, a software-related thing on the PCs you mean? I have three wireless PCs in my network (a desktop, laptop and netbook) and they all get the same results on speedtest.net over the wifi, and the netbook when connected to the router via ethernet also gets the same speed (so, the router slows...

goombawaho: If it was "anything connected to the modem" that slows down over time, then newly rebooting the modem & plugging my PC into it would be the same as newly rebooting the modem & newly rebooting the router. But the router gets only 1 MB/s speed from the get go whereas the PC gets the...

Is it a known problem that Linksys routers irreparably slow down over time? I used to have a WRT54G Linksys router that I replaced about 6 months ago because it would keep dropping the wifi, and the new one I got is a Linksys E1000 (believe it ran me about $70). It used to run just fine, and...

Hi, I'm porting a Perl module for a chatterbot reply scripting language over to C++. The chatterbot scripting language consists of text files containing commands and data that is parsed by the module and turned into usable data in-memory so that the chatterbot app can receive messages from a...

...my ($value,$type,$format,$bytes_after) = $X->GetProperty($xtops->{root}, $_NET_CLIENT_LIST, @getpropconst); my @ids = unpack('L*', $value); print "Window IDs: @ids\n"; foreach my $id (@ids) { # Window class my $WM_CLASS = $xtops->{WM_CLASS}; { my...

Docs about the can() function: http://perldoc.perl.org/UNIVERSAL.html Kirsle.net | My personal homepage perl -e '$|=$i=1;print" oo\n<|>\n_|_";x:sleep$|;print"\b",$i++%2?"/":"_";goto x;'

The *{} format is how this code is declaring dynamic subroutines at run-time. Perl keeps a symbol table of all the variables and things in memory (you can have $var and @var for example, one being a scalar and the other an array, but both with different data... the $ denotes a scalar and the @...

Download Perl, go to a terminal, cd to the downloaded perl's directory and do i.e. ./Configure -des -Dprefix=/usr/local make make test sudo make install It will install the Perl 5.10 binary to /usr/local/bin/perl (the Perl 5.8 would still be available at /usr/bin/perl and it's recommended you...

I usually accomplish these kinds of things like this: print "<ul>\n"; print "<li>" . join("</li>\n<li>", @items) . "</li>\n"; print "</ul>\n"; Kirsle.net | My personal homepage perl -e '$|=$i=1;print" oo\n<|>\n_|_";x:sleep$|;print"\b",$i++%2?"/":"_";goto x;'

It's most likely written in JavaScript. Search the source of the page for it, and then find all the embedded external javascript files for it. It might be a bit trickier to find if they minified or obfuscated their javascript however. Kirsle.net | My personal homepage perl -e '$|=$i=1;print"...

If the PHP script sets the environment variable QUERY_STRING before executing the Perl script, and the Perl script gets its params from the query string, the perl script should be able to get the params. For example (Perl running Perl): # create an enclosing block so we can scope %ENV locally...

This might be applicable to this somehow: http://en.wikipedia.org/wiki/Percent-encoding#Non-standard_implementations If the characters you're using aren't in the ASCII range (0-255) they'd need multiple bytes to display them, so if a unicode string is trying to be parsed as ASCII (one byte per...

App%201%20%E2%80%93%20sum What are these? Three URI escape codes for just one symbol? This might be part of the problem here, when Perl unescapes these it would get three symbols back instead of one. Kirsle.net | My personal homepage perl -e '$|=$i=1;print"...

View the source of the output in plain text to see if the browser is displaying it correctly or if it's coming correctly from the server. Kirsle.net | My personal homepage perl -e '$|=$i=1;print" oo\n<|>\n_|_";x:sleep$|;print"\b",$i++%2?"/":"_";goto x;'