Где фокус?
Замени 'undef' на что-нить другое, чтоб не смущало.
Alexander Q wrote:
> #!/usr/bin/perl
> use strict;
> use warnings;
> use Data::Dumper;
>
> for(1..10) {
> my $t = 'undef' if 0;
> print Dumper $t;
> $t = 'def';
> }
>
--
С уважением,
Евгений Косов