perl Language Primer
2015-07-15 11:01
309 查看
<span style="font-size:18px;">#!/usr/bin/perl print "what's your name? "; chomp($name= <STDIN>); print "welcome, $name,are you ready learn Perl now? "; chomp($response = <STDIN>); if ($response eq "yes" or $response eq "y") { print "Great! Let's get started learning Perl by example.\n"; } else { print "O.K. Try again later.\n" } $now = localtime; print "$name,you ran this script on $now.\n";</span>
解释
01行是标示解释器是perl执行
02用print打印到屏幕输出,perl用print "显示内容";即可
03chomp去掉最后一个字符,即去掉换行符
$name= <STDIN>是设置一个变量$name,来自标准输入<STDIN>,
需要注意的是perl中的变量是$开头
注意perl的变量无需申明即可使用,非常灵活
运行如下
04和05同理
06是一个if语句判断,格式为
if (条件1成立){ 执行语句1 } else { 执行语句2 }
$response eq "yes" or $response eq "y"的意思是变量$response的值为yes,或是y
12是设定一个变量now,来自perl的内建函数localtime
13是显示
二,perl中的注释
注释由#开头,无法使用C中的/* */或者C++中的//
三,执行脚本(习惯把perl程序结尾写为pl,便于和其他区分)
#perl filename.pl 执行filename.pl #perl -c filename.pl 检查语法 #perl -w filename.pl 运行脚本,并对错误的语法进行提示 或者是加执行权限 #chmod +x filename.pl 加执行权限 #./filename.pl 执行脚本
四,命令行使用perl
-e参数命令行执行perl语句 #perl -e 'print "hello\n";' hello 输出hello -n参数,逐一按行显示 #perl -ne 'print;' /etc/passwd root:x:0:0:root:/root:/bin/bash bin:x:1:1:bin:/bin:/sbin/nologin daemon:x:2:2:daemon:/sbin:/sbin/nologin -c,如前所述,检查语法 -w,执行并检查语法
相关文章推荐
- 使用 Unity 和 C# 开发您的首个游戏
- THINKPHP中D方法调用逻辑层类
- C 中scanf ( ) 函数用法 用法
- 一个字符串中字母出现的次数
- empty() is_null() isset() unset() 的理解
- SSAO + FXAA
- Spark分布式计算和RDD模型研究
- weblogic启动报错之WLS_DIAGNOSTICS000000.DAT
- VMWare workstations 10 设置U盘启动
- 黑马程序员--IOS基础第十四天(C语言)
- jQuery实现的进度条效果
- 第九周
- 音频 API 一览
- web应用无法连接数据库 Access denied for user 'root'@'localhost' (using password: YES)
- Unity3D与VS2008结合,加快Unity3D C#开发
- Software caused connection abort: recv failed
- msql 实现sequence功能增强
- Session
- 黑马程序员--IOS基础第十三天(C语言)
- QT designer中找不到setshown