perl | operador de impresión

El operador de impresión en Perl se usa para imprimir los valores de las expresiones en una lista que se le pasa como argumento. El operador de impresión imprime lo que se le pasa como argumento, ya sea una string, un número, una variable o cualquier cosa. Las comillas dobles («») se utilizan como delimitador de este operador. 
 

Sintaxis: print “”
Devuelve: 
0 en caso de error y 1 en caso de éxito.

Ejemplo 1: 
 

#!/usr/bin/perl -w
 
# Defining a string
$string = "Geeks For Geeks";
 
# Defining 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";

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

Ejemplo 2: 
 

#!/usr/bin/perl -w
 
# Defining a string
$string = "Welcome to GFG";
 
# Defining 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";

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