my $string0 = "Jessy"; my $string1 = "Bob"; my $string2 = "Nancy"; my $num = 0; while( $num < 3 ) { my $stringnum = "\$string" . $num; my $result = eval $stringnum; print $result . "\n"; $num++; } #### Jessy Bob Nancy