1 $celsius = 20; 2 while ( $celsius <= 45 ) { 3 $fahrenheit = ( $celsius * 9/5 ) + 32; 4 print "$celsius C is $fahrenheit F\n"; 5 $celsius = $celsius + 5; 6 }