File: vxs.pm

package info (click to toggle)
libversion-perl 1%3A0.8200-1
  • links: PTS, VCS
  • area: main
  • in suites: squeeze
  • size: 500 kB
  • ctags: 840
  • sloc: perl: 1,680; ansic: 789; makefile: 2
file content (27 lines) | stat: -rw-r--r-- 505 bytes parent folder | download
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
26
27
#!perl -w
package version::vxs;

use 5.005_03;
use strict;

use vars qw(@ISA $VERSION $CLASS );

$VERSION = 0.82;

$CLASS = 'version::vxs';

eval {
    require XSLoader;
    local $^W; # shut up the 'redefined' warning for UNIVERSAL::VERSION
    XSLoader::load('version::vxs', $VERSION);
    1;
} or do {
    require DynaLoader;
    push @ISA, 'DynaLoader'; 
    local $^W; # shut up the 'redefined' warning for UNIVERSAL::VERSION
    bootstrap version::vxs $VERSION;
};

# Preloaded methods go here.

1;