Perl <> 符号

最新推荐文章于 2019-05-31 18:54:08 发布

scan724

最新推荐文章于 2019-05-31 18:54:08 发布

阅读量705

点赞数

分类专栏： Perl高级编程

本文链接：https://blog.csdn.net/zhaoyangjian724/article/details/42266469

版权

Perl高级编程专栏收录该内容

41 篇文章 30 订阅 ¥39.90 ¥99.00

订阅专栏

本文介绍了Perl编程中<>符号的用法，它用于从控制台或文件读取数据流。示例展示了如何从控制台读取一行并打印，以及如何打开并逐行读取文本文件。此外，还探讨了正则表达式中的单词边界``如何在匹配字符串时确保精确匹配特定单词。

摘要由CSDN通过智能技术生成

<> 行输入符读取数据流
[oracle@dwh1 perl]$ cat 4.pl 
#!/usr/bin/perl
print "This is my first perl program\n";
$a=<>; ## 从控制台读入字符窜
print $a;
[oracle@dwh1 perl]$ perl 4.pl 
This is my first perl program
aaaaaa
aaaaaa

从控制台读取,再打印一次



open my ($fh) ,'<',"1.txt";
foreach (<$fh>) {
print "$_";
}

[oracle@dwh1 perl]$ cat 7.pl 
open my ($fh) ,'<',"1.txt";
my @f = <$fh>;
print "@f";

[oracle@dwh1 perl]$ perl 7.pl 
aaaaaaaa
 bbbbbbbb
 cccccccc
 dddddddd
 eeeeeeee
 ffffffff
 gggggggg


单词边界:
[oracle@dwh1 perl]$ cat 8.pl 
my $a = "1shanghai";
if ($a =~ /\bshanghai\b/){print "11111\n"};
[oracle@dwh1 perl]$ vi 8.pl
[oracle@dwh1 p

了解本专栏