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