Using a Module from the Standard Perl Library in a Script) : Module « Language Basics « Perl

1.	Array
2.	CGI
3.	Class
4.	Data Type
5.	Database
6.	File
7.	GUI
8.	Hash
9.	Language Basics
10.	Network
11.	Regular Expression
12.	Report
13.	Statement
14.	String
15.	Subroutine
16.	System Functions
17.	Win32
18.	XML

Perl » Language Basics » Module

Using a Module from the Standard Perl Library in a Script)

   



#!/bin/perl

use Carp qw(cluck);  



print "Number: ";

$grade = <STDIN>;

try($grade);     # Call subroutine

sub try{

    my($number)=@_;

    cluck "Illegal value: " if $number < 0 || $number > 100;

}

print "That was just a warning. Program continues here.\n";

Related examples in the same category

1.	Using Perl to Create Your Own Module
2.	Using a Perl 5 Module from the Standard Perl Library
3.	Libraries and Modules

java2s.com | Contact Us | Privacy Policy

All other trademarks are property of their respective owners.