Dragon Gifs and other useful things...

Sunday, September 25, 2005 2:25 PM

I have been known to stick a little dragon from one of the emoticon sites into my chat posts. What follows is sort of a nerd thing.

I have been in a job hunt for some time now, having only found part time work. I peruse the job boards, network, etc.. Quite often you must include a text version of your resume in emails to prospective employers. I got tired of bringing up the text version of my resume in notepad, seleting it, copying it, and pasting it into an email. So, being a nerd I wrote a little program in PERL to push my resume onto the clipboard alowing me to put it into an email with a simple paste. I put an icon on my desk top that would execute the program whenever I double clicked it.

A while ago, I realized that the little program could be used to do the same thing with your favorite gif. So, here goes:

#!/perl/bin/perl
# Put dino url on the clip board
#
use Win32::Clipboard;
use strict;
my $CLIP=Win32::Clipboard();
my $file="c:\\MyDocuments\\dinourl.txt";
open (DINO,$file) || die "Failed to open $file\n";
my $dinourl="";
while (<DINO>){
$dinourl = $dinourl.$_;
}
$CLIP->Set("$dinourl");
close DINO;

I created a file called, c:\\MyDocuments\\dinourl.txt . This contains the url for the little dragon gif, . You would need to create a similar file on your computer with the url of your favorite gif. You would also have to have perl installed along with the WIN32::Clipboard package. I used http://www.activestate.com for my my windows version of perl.

I should create a version that works on linux; but, have been a bit lazay about it.

If you try it, let me know how it worked for you!

Ralph the Hun, Atilla

COMMENTS: 4

Back to Blog Roll