perl新兵，刚学没一天。晒晒

#!C:\perl
$pi=2*3.14;
$R= <stdin>;
$sun=$pi*$R;
print "圆的周长是sun \n";    //计算圆周长，公式是2pi*R


$cost=99;
$xi= <stdin>;         //用户输入价格
if ($xi <= $cost)     //如果输入的价格小于或者等于$cost，执行下列语句
        {
        print "还挺便宜就买下吧！";
        }
else {                //否则，执行这里
        print "太贵了，标价才99元呢！怎么给我卖这么贵啊!";       
        }



$x=100;
$y=1;
while ($y <= $x){
        print "$y \n";
        $y++;
}
X等于100，Y等于1，比较y如果小于或者等于X时，输出Y的当前值，Y自增1，当条件满足等于100时，停止。
学习了oreilly的perl第一章，这是一个我学的语言，学习起来并不是非常痛苦。

嘿嘿，后面会越学越难学的。

2楼也是过来人，看看难学的东东，贴贴哈

这一句能否详细解释下？

楼主看得哪本书？

不错不错！继续努力！
注意代码格式！

条件判断

if ($xi <= $cost)     //如果输入的价格小于或者等于$cost，执行下列语句，意思是条件为真时，继续下面的语句。如果为假则执行else语句,与中文的如果。就是一个意思啊

谢谢版主的鼓励,一定要学会perl

$xi的具体内容？
为什么你这里没有chomp不会出问题，但是另一个帖子里面没有chomp就出问题了
你想过没有？

还真没有，楼上详解，期待