Perl scalar Function
This function forces the evaluation of EXPR to be in scalar context, even if it would normally work in list context.
Following is the simple syntax for this function:
This function returns Scalar.
Following is the example code showing its basic usage:
#!/usr/bin/perl -w @a = (1,2,3,4); @b = (10,20,30,40); @c = ( @a, @b ); print "1 - Final Array is @c\n"; @c = ( scalar(@a), scalar(@b) ); print "2 - Final Array is @c\n";
When above code is executed, it produced following result
1 - Final Array is 1 2 3 4 10 20 30 40 2 - Final Array is 4 4