So any ways SNMP is really a very good subject so i am also presently in a learning stage so just i thgt i could help you out so Firstly the Trap Message shloud be sent on 162 port number. Actually firstly a program on how a trap should be sent. So a simple Trap program to be sent is ...........

#!/usr/bin/perl

use strict;
use Net::SNMP;

   my ($session, $error) = Net::SNMP->session( -hostname  => $ARGV[0] 
+|| 'localhost',
                                               -community => $ARGV[1] 
+|| 'public',
                                               -port      => 162,     
+ # Need to use port 162
                                               -version   => 'snmpv2c'
                                             );
    if (!defined($session))
         {
           printf("ERROR: %s.\n", $error);
           exit 1;
         }

     my $result = $session->snmpv2_trap(
                            -varbindlist =>['1.3.6.1.2.1.1.3.0', TIMET
+ICKS, 600,
                                            '1.3.6.1.6.3.1.1.4.1.0', O
+BJECT_IDENTIFIER, '1.3.6.1.4.1.326'
                                           ]
                                       );
     if (!defined($result))
         {
           printf("ERROR: %s.\n", $session->error());
         }
     else
         {
           printf("SNMPv2-Trap-PDU sent.\n");
         }

$session->close();
exit 0;
[download]