Open In App

Perl | scalar keyword

Improve
Improve
Like Article
Like
Save
Share
Report

scalar keyword in Perl is used to convert the expression to scalar context. This is a forceful evaluation of expression to scalar context even if it works well in list context.
 

Syntax: scalar expr
Returns: a scalar value

Example 1: 
 

Perl




#!/usr/bin/perl -w
 
# Defining Arrays
@array1 = ("Geeks", "For", "Geeks");
@array2 = (1, 1, 0, 0, 9, 6);
 
# Concatenation of both arrays
@array3 = (@array1, @array2);
 
# Printing the Concatenated Array
# in List form
print "Array in List form: @array3\n";
 
# Conversion of Arrays to scalar context
@array3 = (scalar(@array1), scalar(@array2));
 
# Conversion to scalar returns
# the number of elements in the array
print "Array in scalar form: @array3\n";


Output: 

Array in List form: Geeks For Geeks 1 1 0 0 9 6
Array in scalar form: 3 6

 

Example 2: 
 

Perl




#!/usr/bin/perl -w
 
# Defining Arrays
@array1 = ("Welcome", "To", "Geeks");
@array2 = (1, 1, 0, 0, 9, 6);
 
# concatenation of both arrays
@array3 = ( @array1, @array2 );
 
# Printing the Concatenated Array
print "Concatenation of Arrays: @array3\n";
 
# Conversion of Arrays to scalar context to
# Evaluate Difference between size of arrays
@array3 = (scalar(@array2) - scalar(@array1));
 
# Printing the size Difference
print "Difference in number of elements: @array3\n";


Output: 

Concatenation of Arrays: Welcome To Geeks 1 1 0 0 9 6
Difference in number of elements: 3

 



Last Updated : 11 Aug, 2021
Like Article
Save Article
Previous
Next
Share your thoughts in the comments
Similar Reads