As mentioned in the chatterbox, save this to a file, run the file as you would any other perl script. e.g.

d:\pm\perl mb.pl
Your type is 'intp'
[download]

Again see Tutorials -> Getting Started with Perl, http://learn.perl.org/first_steps/.

Update: since there's still confusion, save the following as mb.pl:

#!/usr/bin/perl
use strict;
use warnings;
use Personality::Type::MBTI;
 
my $mbti = Personality::Type::MBTI->new();
 
# sample results from a questionnaire
my @test = qw/i e i e i n s n s n t f t f t p j p j p/;
 
# calculate type
my $type = $mbti->type( @test );
 
print "Your type is '$type'\n";
[download]