Где фокус? Замени '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'; > } > -- С уважением, Евгений Косов