1# 2# Copyright 2005 Sun Microsystems, Inc. All rights reserved. 3# Use is subject to license terms. 4# 5# CDDL HEADER START 6# 7# The contents of this file are subject to the terms of the 8# Common Development and Distribution License, Version 1.0 only 9# (the "License"). You may not use this file except in compliance 10# with the License. 11# 12# You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 13# or http://www.opensolaris.org/os/licensing. 14# See the License for the specific language governing permissions 15# and limitations under the License. 16# 17# When distributing Covered Code, include this CDDL HEADER in each 18# file and include the License file at usr/src/OPENSOLARIS.LICENSE. 19# If applicable, add the following below this CDDL HEADER, with the 20# fields enclosed by brackets "[]" replaced with your own identifying 21# information: Portions Copyright [yyyy] [name of copyright owner] 22# 23# CDDL HEADER END 24# 25#ident "%Z%%M% %I% %E% SMI" 26# 27# Task.pm provides the bootstrap for the Sun::Solaris::Task module. 28# 29 30require 5.6.1; 31use strict; 32use warnings; 33 34package Sun::Solaris::Task; 35 36our $VERSION = '%I%'; 37use XSLoader; 38XSLoader::load(__PACKAGE__, $VERSION); 39 40our (@EXPORT_OK, %EXPORT_TAGS); 41my @constants = qw(TASK_NORMAL TASK_FINAL); 42my @syscalls = qw(settaskid gettaskid); 43@EXPORT_OK = (@constants, @syscalls); 44%EXPORT_TAGS = (CONSTANTS => \@constants, SYSCALLS => \@syscalls, 45 ALL => \@EXPORT_OK); 46 47use base qw(Exporter); 48 491; 50