File: test.pl

package info (click to toggle)
net-snmp 5.9.4%2Bdfsg-2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 38,720 kB
  • sloc: ansic: 282,878; perl: 17,704; sh: 12,151; makefile: 2,711; python: 734; xml: 663; pascal: 62; sql: 47
file content (25 lines) | stat: -rw-r--r-- 451 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
#!./perl
#
# Before `make install' is performed this script should be runnable with
# `make test'. After `make install' it should work as `perl test.pl'

use strict;
use warnings;
use Test;

BEGIN {
    $| = 1;
    plan tests => 9;
}

use NetSNMP::ASN (':all');
ok(1);

ok(ASN_INTEGER, 2);
ok(ASN_OCTET_STR, 4);
ok(ASN_COUNTER, 0x41);
ok(ASN_UNSIGNED, 0x42);
ok(ASN_COUNTER64, 0x46);
ok(ASN_IPADDRESS, 0x40);
ok(ASN_NULL, 5);
ok(ASN_TIMETICKS, 0x43);