पर्ल - स्केलर

स्केलर डेटा की एक एकल इकाई है। वह डेटा एक पूर्णांक संख्या, फ्लोटिंग पॉइंट, एक चरित्र, एक स्ट्रिंग, एक पैराग्राफ या संपूर्ण वेब पेज हो सकता है।

यहाँ स्केलर चर का उपयोग करने का एक सरल उदाहरण है -

#!/usr/bin/perl

$age = 25;             # An integer assignment
$name = "John Paul";   # A string 
$salary = 1445.50;     # A floating point

print "Age = $age\n";
print "Name = $name\n";
print "Salary = $salary\n";

यह निम्नलिखित परिणाम का उत्पादन करेगा -

Age = 25
Name = John Paul
Salary = 1445.5

न्यूमेरिकल स्कैलर्स

एक स्केलर अक्सर एक संख्या या एक स्ट्रिंग है। निम्नलिखित उदाहरण विभिन्न प्रकार के संख्यात्मक स्केल के उपयोग को दर्शाता है -

#!/usr/bin/perl

$integer = 200;
$negative = -300;
$floating = 200.340;
$bigfloat = -1.2E-23;

# 377 octal, same as 255 decimal
$octal = 0377;

# FF hex, also 255 decimal
$hexa = 0xff;

print "integer = $integer\n";
print "negative = $negative\n";
print "floating = $floating\n";
print "bigfloat = $bigfloat\n";
print "octal = $octal\n";
print "hexa = $hexa\n";

यह निम्नलिखित परिणाम का उत्पादन करेगा -

integer = 200
negative = -300
floating = 200.34
bigfloat = -1.2e-23
octal = 255
hexa = 255

स्ट्रिंग स्केलर

निम्नलिखित उदाहरण विभिन्न प्रकार के स्ट्रिंग स्केलर के उपयोग को प्रदर्शित करता है। एकल उद्धृत स्ट्रिंग्स और डबल उद्धृत स्ट्रिंग्स के बीच अंतर पर ध्यान दें -

#!/usr/bin/perl

$var = "This is string scalar!";
$quote = 'I m inside single quote - $var';
$double = "This is inside single quote - $var";

$escape = "This example of escape -\tHello, World!";

print "var = $var\n";
print "quote = $quote\n";
print "double = $double\n";
print "escape = $escape\n";

यह निम्नलिखित परिणाम का उत्पादन करेगा -

var = This is string scalar!
quote = I m inside single quote - $var
double = This is inside single quote - This is string scalar!
escape = This example of escape -       Hello, World

स्केलर संचालन

आपको एक अलग अध्याय में पर्ल में उपलब्ध विभिन्न ऑपरेटरों का विवरण दिखाई देगा, लेकिन यहां हम कुछ न्यूमेरिक और स्ट्रिंग ऑपरेशनों को सूचीबद्ध करने जा रहे हैं।

#!/usr/bin/perl

$str = "hello" . "world";       # Concatenates strings.
$num = 5 + 10;                  # adds two numbers.
$mul = 4 * 5;                   # multiplies two numbers.
$mix = $str . $num;             # concatenates string and number.

print "str = $str\n";
print "num = $num\n";
print "mul = $mul\n";
print "mix = $mix\n";

यह निम्नलिखित परिणाम का उत्पादन करेगा -

str = helloworld
num = 15
mul = 20
mix = helloworld15

मल्टीलाइन स्ट्रिंग्स

यदि आप अपने कार्यक्रमों में मल्टीलाइन स्ट्रिंग्स शुरू करना चाहते हैं, तो आप नीचे दिए गए मानक एकल उद्धरणों का उपयोग कर सकते हैं -

#!/usr/bin/perl

$string = 'This is
a multiline
string';

print "$string\n";

यह निम्नलिखित परिणाम का उत्पादन करेगा -

This is
a multiline
string

आप "यहां" दस्तावेज़ सिंटैक्स का उपयोग कर सकते हैं और साथ ही नीचे बहुस्तरीय को स्टोर या प्रिंट कर सकते हैं -

#!/usr/bin/perl

print <<EOF;
This is
a multiline
string
EOF

यह भी वही परिणाम देगा -

This is
a multiline
string

वि स्ट्रिंग्स

प्रपत्र v1.20.300.4000 का एक शाब्दिक निर्दिष्ट अध्यादेशों के साथ पात्रों से बना एक स्ट्रिंग के रूप में पार्स किया जाता है। इस रूप को v- स्ट्रिंग्स के रूप में जाना जाता है।

V- स्ट्रिंग कुछ कम पठनीय प्रक्षेप रूप "\ x {1} \ x {14} \ x {12c} \ x {fa0}" का उपयोग करने के बजाय, स्ट्रिंग के निर्माण के लिए एक वैकल्पिक और अधिक पठनीय तरीका प्रदान करता है।

वे कोई भी शाब्दिक हैं जो एवी से शुरू होते हैं और उसके बाद एक या एक से अधिक डॉट-अलग तत्व होते हैं। उदाहरण के लिए -

#!/usr/bin/perl

$smile  = v9786;
$foo    = v102.111.111;
$martin = v77.97.114.116.105.110; 

print "smile = $smile\n";
print "foo = $foo\n";
print "martin = $martin\n";

यह भी वही परिणाम देगा -

smile = ☺
foo = foo
martin = Martin
Wide character in print at main.pl line 7.

विशेष साहित्य

अब तक आपको स्ट्रिंग स्केलर और इसके कॉन्सेप्टेशन और इंटरपोलेशन ओपेशन के बारे में महसूस होना चाहिए। तो मैं आपको तीन विशेष शाब्दिकों के बारे में बताता हूं __FILE__, __LINE__, और __PACKAGE__ आपके प्रोग्राम में उस बिंदु पर वर्तमान फ़ाइल नाम, लाइन नंबर और पैकेज नाम का प्रतिनिधित्व करते हैं।

उनका उपयोग केवल अलग-अलग टोकन के रूप में किया जा सकता है और स्ट्रिंग्स में प्रक्षेपित नहीं किया जाएगा। नीचे दिए गए उदाहरण की जाँच करें -

#!/usr/bin/perl

print "File name ". __FILE__ . "\n";
print "Line Number " . __LINE__ ."\n";
print "Package " . __PACKAGE__ ."\n";

# they can not be interpolated
print "__FILE__ __LINE__ __PACKAGE__\n";

यह निम्नलिखित परिणाम का उत्पादन करेगा -

File name hello.pl
Line Number 4
Package main
__FILE__ __LINE__ __PACKAGE__