[mar]

Может быть все дело в разных интрепритаторах и (может быть) в строчке

Код:

use strict;

?
Еще можно попробовать:

Код:

#!/usr/bin/perl -w
use strict;
#сначала объявляем
my $str1;
my $str2;
# а потом присваиваем что хотим
$str1= "string 1\n";
$str2 = "old value\n";
print $str1, $str2;
$str2 = "new value\n";
print $str2;

А какая у Вас система и Perl, Guest?


[s]Исправлено: mar, 0:59 30-06-2004[/s]