$n = 10; 
while( $n ){ 
    print $n--; 
}
continue{ 
    sleep 1;
}

##</code><code>##

$n = 10; 
while( $n ){ 
    print $n--; 
    sleep 1 
}