First I borrowed a slide from Damian's presentations. The slide is just a big smiley on the center. And I said that I was happy I can present Perl to the audience. Remember: show them, that Perl is fun!

Second: I focused on the point that Perl was designed to operate on text. I started with slide with such code:

#!perl

use strict;
use warnings;

my ($INFILE, $OUTFILE);

open $INFILE, 'acis_empx20_win32d_3400.log' or die "Cannot open file: 
+$!";
open $OUTFILE, '> acis_filtered.log' or die "Cannot open acis_filtered
+.log: $!";

while(my $line = <$INFILE>)
{
    if($line =~ /RS/)
        { print $OUTFILE $line }
}

close $INFILE;
close $OUTFILE;


and example of use: C:>script.pl
[download]

and started to replace or remove parts of above code, ending with following:

#!perl -n

if(/RS/) { print }


and example of use:
C:\>script.pl acis_empx20_win32d_3400.log > acis_filtered.log
[download]

I did it on 8 slides, after 5th they started laughing and begging not to annihilate whole code and save at least few chars :)

Focus on this, it is in my opinion the most essential part of Perl. Show few examples of how to use -n and -p switches in daily work. If you are not familiar with it - learn it, use it, tell about it.

After that I said few words about regexps, but without details - this is topic for separate presentation. I focused on showing where regular expressions exist in applications used by us and how to use it (it was Eclipse Find/Replace dialog, Visual Studio Find/Replace, TotalCmd Find and multiple rename tool, Context editor Find/Replace tool, even MS Word).

Then were a few real life problems about parsing files and texts and solving daily problems. If you have any such stories, tell about it shortly. Show to the people how you did your work and let them judge if it saved your time. Add pictures. Funny ones. Keep them smiling.

At the end I presented a few CPAN modules and again I let them judge if it is easier then in other languages.

PDF::API2 with following code

#!perl

use PDF::Reuse;

use constant mm => 25.4 / 72; # 72 punkty na cal to 2.83 punktu na 1 m
+m
use constant in => 1 / 72;
use constant pt => 1;

prFile('h1.pdf');
prFont('Helvetica');
prFontSize(12);
my $str = 'This module could be used when you want to mass produce sim
+ilar (but not identical) PDF documents';
prText(5/mm, 170/mm, $str);
prText(5/mm, 170/mm - 12/pt, $str);
print prStrWidth($str, 'Helvetica', 12/pt);
prEnd();
[download]

Win32::OLE

#!perl

use Win32::OLE;
my $voice = Win32::OLE->new('SAPI.SpVoice');

$voice->speak("3.09");
[download]

LWP::Simple

use LWP::Simple;

my $str = get('http://repository.jboss.com/maven2/jboss/');

print $str;
[download]

Graph::Easy - this one was little more complicated, as I presented few possibilities - to generate ascii graphs, to read from file, to make html output and to use with dot.exe tool to generate png examples. Examples are in the module itself, so dig there if you want.

And at the end one simple slide about mod_perl - just few words that Perl can be used like PHP or JSP, no examples, this is another big topic for separate presentation.

Installation of Apache 2.2 - next, next, next, finish.
Installation of mod_perl

C:\>ppm install http://cpan.uwinnipeg.ca/PPMPackages/10xx/mod_perl.ppd
Downloading mod_perl-2.000004...done
Unpacking mod_perl-2.000004...done
Generating HTML for mod_perl-2.000004...done
<..........>
Where should mod_perl.so be placed? [D:/Apache2.2/modules] C:/Progra~1
+/Apache2.2/modules
<...........>
done
 474 files installed
C:\>

Configuration in httpd.conf:
LoadFile "C:/Path/to/Perl/bin/perl510.dll"
LoadModule perl_module modules/mod_perl.so
[download]

Of course I had to mention about beloved Perlgolf :) with following words: "If you don't know, there is a game called perlgolf. There is a simple problem and a task is to write shortest program. Of course one has to use all the tricks Perl offers. I personally will throw off your head if you use those tricks in production code :) but I strongly encourage you to take part in perlgolf contest while learning Perl, because there is nothing more stimulating than a little competition :)"

In one group this all took 1,5h, in another one it was about 3h, so I don't know what to advice you if you have to estimate time of the presentation :)

I hope this will help you. Have fun. Show them it is fun. And good luck in converting people to Perl :)

Update: Forgot to mention: people asked if there is any way to test GUI components. Without any slide prepared, I just opened Firefox, came to CPAN, searched for Win32::GuiTest (X11::GuiTest is there too if you need) and just showed example code from package description. That was enough to show how easy and powerful the package is and to make them happy. During last presentation we installed it on the fly (5 minutes or less) and did even a demo! It was really something to show calculator magically filled with data and doing some calculations :)