Windows Screenshot from perl
Snippet Menu
ranking 
|
date
|
member 
|
date
|
member
6
Prints the user's IP address and localtime on a web page.
9
This is a little example of how to use threads in Perl. It creates three threads and runs them... That's it... 
7
Get a FileSize
6
Prior to NETCF 2.0, this was a royal pain. Now, it's pretty straight-forward.
These three related functions provide basic Clipboard operations for text. While not terribly useful by themselves, they become more useful when attached to a field's context menu or, better yet, implemented in a custom control.
These three related functions provide basic Clipboard operations for text. While not terribly useful by themselves, they become more useful when attached to a field's context menu or, better yet, implemented in a custom control.
7
Mon. Nov. 6th, 2006 1:48 PM 
1
RobHarrigan
"first | "title | capitalize | case" | letter" | Perl 
3 comments
Function to capitalize the first letter in every word in a string, but only if the entire string is in ALL CAPS.
Example:
"I LIKE TO SCREAM" becomes "I Like To Scream"
"I LIKE to RUN" remains "I LIKE to RUN".
Example:
"I LIKE TO SCREAM" becomes "I Like To Scream"
"I LIKE to RUN" remains "I LIKE to RUN".
0
Mon. Oct. 9th, 2006 1:14 PM 1
robert
"record time" | day | hour | localtime | minute | Perl 3 comments
This perl function will output to a file of your choosing the current localtime as defined by perl's localtime function. It will output the date in ISO 8601 date format plus the current localtime such as:
2006-08-21 09:26:35 am
The function also returns the localtime without the date to the calling environment.
2006-08-21 09:26:35 am
The function also returns the localtime without the date to the calling environment.
9
Simple class to allow cut and paste to clipboard.
5
I've found it kind of complicated to strip newline chars from a file with just the commandline. This tiny piece of code does just that.
I've found it especially useful when extracting tabulated data from a grabbed site where each cell is on a different html line. This way I can pre-filter the html, remove the newlines, and insert them again at register boundaries (row end in this case), so that with just a couple more replacement from within a regex enabled text editor I can copy&paste it directly to a database.
I've found it especially useful when extracting tabulated data from a grabbed site where each cell is on a different html line. This way I can pre-filter the html, remove the newlines, and insert them again at register boundaries (row end in this case), so that with just a couple more replacement from within a regex enabled text editor I can copy&paste it directly to a database.
5
I needed a quick way to make a Street Address and City proper case.
Lingua::EN::NameCase works best for peoples names, but it does not work well for Addresses. This is not intended by any means to be complete, but is quick and dirty.
Plus, there are not many Perl snippets here. So, I thought I would start simple :-)
Lingua::EN::NameCase works best for peoples names, but it does not work well for Addresses. This is not intended by any means to be complete, but is quick and dirty.
Plus, there are not many Perl snippets here. So, I thought I would start simple :-)
9
The docs for Compress::Zlib for perl are very complex. But, the most simple use of the Module is not too bad. I've waded through the perdoc so you don't have to.
Gunzip.pl is here. I will let you know when I have Gzip.pl done.
You can do something more interesting with "success" variable.
Gunzip.pl is here. I will let you know when I have Gzip.pl done.
You can do something more interesting with "success" variable.
