#!/usr/bin/perl $age = 20; # 整数赋值 $name = "W3xue"; # 字符串 $salary = 130.50; # 浮点数 print "Age = $age\n"; print "Name = $name\n"; print "Salary = $salary\n";