while test do cmd done
perl跟c是一樣的,除了變數用法不一樣
while (condition) { statment1; } unless (condition) { statment1; }
C
while (condition) { statment1; } do { statment1; } while (condition)