perl 读取OS环境变量

最新推荐文章于 2024-08-01 14:36:40 发布
最新推荐文章于 2024-08-01 14:36:40 发布
阅读量943 收藏 2
点赞数 1
分类专栏： Perl高级编程 文章标签： 服务器 linux 运维
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/zhaoyangjian724/article/details/128538757
版权
Perl高级编程 专栏收录该内容
41 篇文章 30 订阅 ¥39.90 ¥99.00
订阅专栏
本文展示了如何在Perl脚本中使用`$ENV{HOME}`读取Linux环境变量，并结合`lib`目录中的模块进行调用。通过`use lib`指令将自定义模块路径加入到搜索路径，然后导入并执行`Pkg1::fun1`函数，打印特定字符串。
摘要由CSDN通过智能技术生成

[oswatch@ww scan]$ pwd
/oswatch/oswatch/scan
[oswatch@ww scan]$ ls
lib  scripts
[oswatch@ww scan]$ ls -ltr lib/
total 4
-rw-rw-r-- 1 oswatch oswatch 124 Jan  3 16:21 Pkg1.pm
[oswatch@ww scan]$ ls -ltr scripts/
total 4
-rw-rw-r-- 1 oswatch oswatch 61 Jan  3 16:21 test.pl

[oswatch@ww scan]$ cat lib/Pkg1.pm 
package Pkg1;
require Exporter;
@ISA=qw(Exporter);
@EXPORT_OK=qw(fun1);
sub fun1 {print "20230103aabbcc20230103"."\n";};
1;


[oswatch@ww scan]$ cat scripts/test.pl 
use lib  "$ENV{HOME}/scan/lib";
use Pkg1 qw(fun1) ;
&fun1();
 

scan724
关注
专栏目录
订阅专栏
Perl语言入门学习
数字人生
06-12 1812
Perl语言的学习不仅仅是掌握一门语言的语法，更多的是学会如何使用这门语言解决实际问题。同时，要注意避免Perl语言的一些缺点，比如代码的可读性和性能问题，通过良好的编码习惯和对use strict和use warnings的使用来提升代码质量。Perl的设计理念是“让常见任务简单，让困难任务可能”，因此它拥有丰富的文本处理功能和强大的正则表达式支持。Perl是一种高级的、通用的、解释型的编程语言，最初设计用于文本处理，但随着时间的推移，它的用途已经扩展到许多其他领域。
Perl 获得环境变量
热门推荐
zxianyong的专栏
09-11 1万+
 %ENV 是系统的一个哈希数列#!/usr/bin/perl -wuse strict;use Data::Dump 'dump';print dump(%ENV)," /n";打印其中 =>Part #!/usr/bin/perl -wuse strict;use Data::Dump 'dump';print "-------------------------","/n";print "PATH is $ENV{PATH}/n";
Perl读取CGI环境变量
weixin_52505665的博客
03-09 222
#!/usr/bin/perl print "Content-type:text/html\r\n\r\n"; print '<html>'; print '<head>'; print '<meta charset="utf-8">'; print '<title>Enviroment variables</title>'; print '</head>'; print '<body>'; print '<pr
perl中显示环境变量
ambercctv的博客
05-13 1832
#print("__FILE__"); @names =keys %ENV; foreach $Item (@names) { print("$Item=$ENV{$Item}\n"); } $ENV{'CCTV'}="****cctv10******"; print("#####################################################\n")...
perl解码环境变量
isgirl2011的博客
12-13 273
环境变量携带的中文，在perl获取时是一串字母数字加%的字符串，要想获取原始的中文，只需将环境变量用函数uri_unescape($str)转化即可，需引入模块use URI::Escape;
perl常用环境变量
08-04 972
perl常用环境变量（转帖）   2008-12-25 17:18:51|  分类：  Perl|字号 先来一个例子吧 #!/usr/bin/perl use warnings; @array = q
perl输出环境变量
海内存知己，天涯若比邻
10-10 1488
windows中my computer-->advanced->envirenment查看总是看得不是很清楚 刚做MTK平台上的开发时,老是遇到工具安装不正确的问题,大多时候是因为环境变量没设好 本程序提供将环境变量输出到一个文本里便于查看确认 #!/usr/local/bin/perl open(MYFILE,">env.txt"); foreach $field (k
nodejs 获取系统环境变量_Node.JS通过读取PATH环境变量获取可执行文件的安装地址...
weixin_39609718的博客
12-19 2349
有暑假我们可能需要获取某些可执行程序的安装地址，比如说git,node.js等。此时我们可以直接读取环境变量来获取。1. 访问环境变量在node.js中可以通过 process.env来获取所有环境变量，如：console.log(process.env)输出结果：{ ACLOCAL_PATH: '/mingw64/share/aclocal:/usr/share/aclocal',ALLUSER...
Mac系统环境优先级，flutter、Android Studio、Java等环境变量配置
草帽~小子^的博客
12-04 5369
度娘：环境变量是在操作系统中一个具有特定名字的对象，它包含了一个或者多个应用程序所将使用到的信息。例如Windows和DOS操作系统中的path环境变量，当要求系统运行一个程序而没有告诉它程序所在的完整路径时，系统除了在当前目录下面寻找此程序外，还应到path中指定的路径去找。用户通过设置环境变量，来更好的运行进程。 一、1.为什么配置环境变量？ 先安装的是JDK（Java Development...
env 查看环境变量
02-10
linux操作系统 命令env详解 查看环境变量一步步详细步骤；
CygWin环境配置
好记性不如烂笔头
12-12 3627
安装CygWin 安装cygwin的时候，顺便安装下面这些tool： tree, vim, wget, curl, tmux, lynx, 安装apt-cyg lynx -source rawgit.com/transcode-open/apt-cyg/master/apt-cyg > apt-cyg install apt-cyg /bin 安装zsh # 安装zsh apt-cyg install zsh # 配置oh-my-zsh git clone git://github.com/robb
掌握Perl中环境变量的艺术：探索环境的隐秘力量
2401_85760095的博客
08-01 560
环境变量是存储在操作系统中的命名值对，它们可以表示系统配置、用户信息、程序运行时的参数等。%ENV：Perl内置的关联数组，用于访问当前进程的环境变量。$ENV{$key}：通过键值访问特定的环境变量。：临时改变环境变量的值。
Perl脚本获取.bash_profile中变量
Lissen_Gan的博客
11-12 397
Perl脚本获取.bash_profile中变量
Perl中的环境变量%ENV
爱飞的蒲公英
04-06 1万+
Perl中有一个叫做%ENV的环境变量，和其它的HASH散列一样，它可以被赋值，被打印。 打印的方法： while(my ($key,$value)=each%ENV) {     print "$key: $value\n"; } 赋值的方法： $ENV{'key'}="value"; 但是该方法只能在该进程中有效，当退出该进程时，赋值将不会继续存在；同时其它
linux中perl的环境变量,在Perl脚本中使用Bash环境变量？
weixin_42347375的博客
05-04 1381
小编典典这里有两个查询，关于使用Bash变量和运行外部命令。Perl中有%ENV哈希，带有环境变量perl -wE'say $ENV{PWD}'但是，通常最好在脚本中使用等效项，因为脚本的含义可能会有所不同，或者在脚本运行时会有所变化。更重要的是，使用shell命令会使您面临引号，shell注入和解释的各种潜在问题。例如，您显示的命令很危险，如CharlesDuffy注释中所述。原则上，最好使用P...
perl 内置操作符 $^O -判断操作系统环境
weixin_33919950的博客
05-24 729
今天看bowtie2的源代码的时候，发现有这样一段用法： my $os_is_nix = $^O ne "MSWin32"; my $align_bin_s = $os_is_nix ? 'bowtie2-align-s' : 'bowtie2-align-s.exe'; my $build_bin = $os_is_nix ? 'bowtie2-build' : 'bowtie2-b...
在Perl中获取当前目录的完整路径pwd
sxlwzl的专栏
04-13 1万+
zz : http://hi.baidu.com/kenking2008/item/85b170c1d24150ddef183b49 在Perl中获取当前目录的完整路径 有两种方法： 1. use Cwd; my $dir = getcwd; #$dir中即为当前目录的完整路径信息。 2. my $dir = $ENV{'PWD'}; #ENV是一个散列，用于
零基础CMake入门（基于ROS）
qq_34761779的博客
10-16 3495
零基础CMake入门（基于ROS）
perl 脚本能改环境变量吗
最新发布
09-12
它提供了一个简单的方式来读取和设置环境变量。首先，需要安装这个模块 (`cpanm Env` 或者 `use CPAN; install Env`)，然后像下面这样操作： ```perl use Env qw( $PATH ); my $new_path = "/new/path"; push @{...
评论 1
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

scan724

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付：¥1
获取中
扫码支付

您的余额不足，请更换扫码支付或充值

打赏作者

实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值