Help for this page

Select Code to Download

Select or download this
```
d:\pm\perl mb.pl
Your type is 'intp'
```

Select or download this

#!/usr/bin/perl
use strict;
...
my $type = $mbti->type( @test );
 
print "Your type is '$type'\n";