小白自学Perl，笔记

Perl语言入门，第17章习题第一题。

#! /usr/bin/perl -w
use strict; #编译指令，提高编译约束力，减小脚本容错值。
use v5.16;    #指定Perl版本
use autodie;    #指定Perl负责自动抛出异常，相当于die指令
my $count=0;
my @matches;
my $filename='sample_text.txt';#记得字符串赋值给标量要带上单或双引号
open my $fh, '<', $filename;
chomp(my @strings= <$fh>); #这样会将文件存入内存里，方便读取。
while(1){say "please print your pattern:";chomp(my $pattern=<STDIN>);exit if $pattern eq ''; #标准输入输入空白行则退出eval    #eval用于捕获错误{foreach (@strings){if ($_=~/$pattern/){push @matches, $_; #将所匹配的行放进数组@matches里面$count++;}}};if($@)    #eval产生的错误会放在特殊变量$@里面。{print "Error:$@";}else{foreach (@matches){say $_;}say "There were $count matching strings:";}}

Perl语言入门，第17章习题第二题。

#! /usr/bin/perl -w
use strict;
use v5.16;
use autodie;
#my @file=@ARGV;
foreach (@ARGV) #@ARGV数组存取命令行参数，如果命令行参数含有通配符，Shell会先自我展开通配符再传命令行参数给@ARGV
{
my ($atime,$mtime)=(stat $_)[8,9];#数组切片，在列表上下文中返回指定的数组元素。
printf "%-s\t%s\t%s\n",$_,$atime,$mtime;
}

Perl语言入门，第17章习题第三题。

#! /usr/bin/perl -w
use strict;
use v5.16;
use autodie;print map {
my @time=(stat $_)[8,9];
my @atime=(localtime $time[0])[5,4,3];
my @mtime=(localtime $time[1])[5,4,3];
$atime[0]+=1900;
$atime[1]+=1;
$mtime[0]+=1900;
$mtime[1]+=1;
sprintf "%-s\t\t%4d-%02d-%02d\t\t%4d-%02d-%02d\n",$_,@atime,@mtime;
} @ARGV;

Perl语言入门，第17章自写习题答案。相关推荐

Perl语言入门-第四章-子程序-习题
1. 题目 2. 代码 1 #-----------------------------------------------------------# 2 # Source: Learning ...
浙大版《C语言程序设计》第四版(何钦铭颜晖) 第9章结构课后习题答案
浙大版<C语言程序设计>第四版(何钦铭颜晖) 第9章结构课后习题答案你也可以上程序咖(https://meta.chengxuka.com),打开大学幕题板块,不但有答案,讲解,还可 ...
数据结构严慰敏（C语言版第2版）【习题答案】
文章目录前言第1章绪论第2章线性表第3章栈和队列第4章串.数组和广义表第5章树和二叉树第6章图第7章查找第8章排序前言数据结构(C语言版第2版)[习题答案] 第1 ...
c++语言基础教程第三版习题答案,《C++语言基础教程》吕凤翥习题答案
<<C++语言基础教程>吕凤翥习题答案>由会员分享,可在线阅读,更多相关<<C++语言基础教程>吕凤翥习题答案(66页珍藏版)>请在人人文库网上搜索. ...
数据结构（C语言版第2版）课后习题答案严蔚敏等编著
数据结构(C语言版第2版)课后习题答案严蔚敏等编著,仅供参考,还是自己认真做了再看第1章绪论 5．选择题 (1)在数据结构中,从逻辑上可以把数据结构分成( C ). A．动态结构和静态 ...
java语言程序设计郑莉课后答案_java语言程序设计郑莉第九篇课后习题答案.docx...
java语言程序设计郑莉第九篇课后习题答案.docx 还剩 36页未读, 继续阅读下载文档到电脑,马上远离加班熬夜! 亲,很抱歉,此页已超出免费预览范围啦! 如果喜欢就下载吧,价低环保! 内容要点: ...
计算机网络第二章物理层部分习题答案
计算机网络第二章物理层部分习题答案 2-01 物理层要解决哪些问题?物理层的主要特点是什么? 答:物理层要解决的主要问题: (1)物理层要尽可能地屏蔽掉物理设备和传输媒体,通信手段的不同,使数据链路层 ...
数据结构（C语言版第2版）课后习题答案严蔚敏版
数据结构(C语言版第2版)课后习题答案严蔚敏等编著,仅供参考,还是自己认真做了再看第1章绪论 5．选择题 (1)在数据结构中,从逻辑上可以把数据结构分成( C ). A．动态结构和静态 ...
数据结构（C语言版严蔚敏编著）课后习题答案
转自 https://blog.csdn.net/Bamboo_shui/article/details/72433523 (原文没第八章答案) 数据结构(C语言版第2版)课后习题答案严蔚敏 ...
大学物理学（第5版）下（第14章）课后习题答案
大学物理学(第5版)下第9章静电场课后习题答案第10章稳恒磁场课后习题答案第11章变化的电磁场课后习题答案第12章光的干涉课后习题答案第13章 ...

Perl语言入门，第17章自写习题答案。

Perl语言入门，第17章习题第一题。

Perl语言入门，第17章习题第二题。

Perl语言入门，第17章习题第三题。

Perl语言入门，第17章自写习题答案。相关推荐

最新文章

热门文章