Perl | print operator

print operator in Perl is used to print the values of the expressions in a List passed to it as an argument. Print operator prints whatever is passed to it as an argument whether it be a string, a number, a variable or anything. Double-quotes(“”) are used as a delimiter to this operator.

Syntax: print “”

Returns:
0 on failure and 1 on success.



Example 1:

filter_none

edit
close

play_arrow

link
brightness_4
code

#!/usr/bin/perl -w
  
# Defining a string
$string = "Geeks For Geeks";
  
# Defning an array of Integers
@array = (10, 20, 30, 40, 50, 60);
  
# Searching a pattern in the string
# using index() function
$index = index ($string, 'or');
  
# Printing the position of matched pattern
print "Position of 'or' in the string $index\n";
  
# Printing the defined array
print "Array of Integers is @array\n";

chevron_right


Output:

Position of 'or' in the string 7
Array of Integers is 10 20 30 40 50 60

Example 2:

filter_none

edit
close

play_arrow

link
brightness_4
code

#!/usr/bin/perl -w
  
# Defining a string
$string = "Welcome to GFG";
  
# Defning an array of integers
@array = (-10, 20, 15, -40, 45, -60);
  
# Searching a pattern in the string
# using index() function
$index = index($string, 'o G');
  
# Printing the position of matched pattern
print "Position of 'o G' in the string $index\n";
  
# Printing the defined array
print "Array of Integers @array\n";

chevron_right


Output:

Position of 'o G' in the string 9
Array of Integers -10 20 15 -40 45 -60


My Personal Notes arrow_drop_up

Check out this Author's contributed articles.

If you like GeeksforGeeks and would like to contribute, you can also write an article using contribute.geeksforgeeks.org or mail your article to contribute@geeksforgeeks.org. See your article appearing on the GeeksforGeeks main page and help other Geeks.

Please Improve this article if you find anything incorrect by clicking on the "Improve Article" button below.