Две важнейших операции, касающиеся содержимого файлов — ввод (чтение) из файла и вывод (запись) в файл.

Perl
my $file;
open $file, '<', 'MyFile.txt';	открытие для чтения

Perl
open my $file, '<', 'MyFile.txt';

Perl
open my $file, '>', 'MyFile.txt';	открытие для записи

Perl
chdir '/';

Perl
open my $passwd, '<', '/etc/passwd';

Perl
close $file;

Perl
if(open …)
{
	работа с файлом и последующее закрытие
}
else
{
	die "Невозможно открыть файл: $!\n";
}

Perl
open … or die "Невозможно открыть файл: $!\n";

Perl
for(@fileNames)
{
	open my $file, '<', $_ or warn "Невозможно открыть файл $_: $!" and next;
	работа с очередным файлом и последующее его закрытие
}

Perl
read $file, $buffer, 16;

Perl
while(read $file, $buffer, $size)
{
	сделать что-то с $buffer
}

Perl
open my $file, '<', 'file.txt' or die "Невозможно открыть файл: $!\n";

while(<$file>)
{
	print;
}

Perl
my $sum=0;

while(<$file>)
{
	chomp;
	$sum+=$_;
}

print "$sum\n";

Perl
$s=<$file>;

Perl
@s=<$file>;

Perl
print for <$file>;

Perl
print <$file>;

Perl
print $file $string;

GLOB(0x989e830)Привет!

Perl
print $file 'Hello, ', $user;

Perl
print $file('Hello, ', $user);

Perl
print {$file} 'Hello, ', $user;

Perl
print "Уважаемый $name! Вы задолжали $duty рублей. Уплатите до $date, иначе $punishment.\n";

Perl
printf "Целая часть π равна %d\n", 3.1415926;

Целая часть π равна 3

Perl
printf "%4d\n", $_**3 for 1..10;

   1
   8
  27
  64
 125
 216
 343
 512
 729
1000

Perl
printf "%04d\n", $_**3 for 1..10;

0001
0008
0027
0064
0125
0216
0343
0512
0729
1000

Perl
printf "%03X\n", $_**3 for 1..10

001
008
01B
040
07D
0D8
157
200
2D9
3E8

Perl
printf "%4B\n", $_ for 1..10;

   1
  10
  11
 100
 101
 110
 111
1000
1001
1010

Perl
printf "%.2f\n", rand for 1..10;

0.70
0.05
0.41
0.75
0.29
0.67
0.95
0.54
0.75
0.26

Perl
$p=38; $x=43;
printf "%d%% от %d равно %d\n", $p, $x, $p/100*$x;

38% от 43 равно 16

Perl
printf {$file} …;