BBS.ChinaUnix.net
今日推荐
首页
|
新闻
|
Linux
|
AIX
|
博客
|
论坛
|
存储
|
人才
|
培训
|
知识库
|
资料
|
读书
|
手册
|
精华
|
下载
|
空间
会员:
密码:
免费注册
|
忘记密码
|
会员登录
|
搜索
|
帮助
数组如何取值 IP
1
2
››
首页
»
论坛
»
Perl
»
论坛跳转 ...
> Linux论坛
> BSD
> BSD文档中心
> Solaris
> Solaris文档中心
> 互操作专区
> AIX
> AIX文档中心
> AS400
> HP-UX
> HP文档中心
> SCO UNIX
> SCO文档中心
> Tru64 UNIX
> IRIX
> Mac OS X
> C/C++
> Shell
> Java
> Java文档中心
> Php
> Perl
> Python
> Python文档中心
> Web开发
> 软件工程
> 中间件技术
> GUI编程
> 软件配置管理
> VOIP开发技术
> CPU与编译器
> Ruby
> 网络安全
> 网络技术
> 网络技术文档中心
> 存储备份之家
> 存储文档中心
> 存储业界
> 服务器及硬件技术
> MySQL
> Sybase
> Oracle
> PostgreSQL
> DB2
> Informix
> Web服务器
> Mail服务器
> FTP服务器
> DNS服务器
> Proxy服务器
> LDAP
> VPN
> Lotus
> Samba
> 金融行业
> 电信行业
> 互联网行业
> 制造行业
> 医卫行业
> 教育行业
> 媒体娱乐行业
> 电子政务
> 信息安全
> 交通行业
> IT业界新闻与评论
> IT职业生涯
> IT培训与认证
> IT二手大厅
> IT图书与评论
> 清茶斋
> 投资理财
> 运动地带
> 北京2008奥运专版
> 快乐数码摄影
> 影音文字
> English Forum
> 游戏玩家
> 旅游天下
> IT爱车族
> CU活动专区
> 站务交流
> 博客站务交流区
> 下载频道交流区
> 空间圈子交流区
最近访问的论坛 ...
时代域名主机托管全面特惠
|
CU积分兑换详情
|
100积分:谈谈您对校园网建设的体会
|
CU《奥运之春》摄影获奖作品展示
|
《奥运之夏》摄影赛开始
|
[
打印
] [
订阅
] [
收藏
] [
推荐给朋友
] [
本帖文本页
]
[已解决] 本主题悬赏 可用积分 2
ppiqq
精灵王
UID:631513
注册:2007-10-22
最后登录: 2008-07-03
帖子:
297
精华:0
可用积分:18
信誉积分:
215
专家积分:
0
(本版)
状态:
...离线...
[
个人空间
] [
短信
] [
博客
]
1楼
发表于 2008-5-15 11:38
数组如何取值
IP
请大家帮帮忙 我刚接触perl
第一次编程 想要实现的是:
将一些IP放入到数组里面 然后递归的根据里面的变量对相应的IP操作
这个应该怎么实现呢?
也就是说如何使用perl实现类似C下面的对于数组的 for循环
[
本帖最后由 ppiqq 于 2008-5-15 15:48 编辑
]
您对本贴的看法:
鲜花[0]
臭蛋[0]
CU可用积分兑换Linux/Unix精品图书
|
《Ubuntu标准教程》书评获奖名单公布
churchmice
风云使者
数字小白
UID:664989
注册:2008-1-23
最后登录: 2008-07-04
帖子:
457
精华:0
可用积分:973
信誉积分:
0
专家积分:
7
(本版)
状态:
...离线...
[
个人空间
] [
短信
] [
博客
]
最佳答案
2楼
发表于 2008-5-15 11:38
QUOTE:
原帖由
ppiqq
于 2008-5-15 17:29 发表
#!/usr/bin/perl
use strict;
my @test=qw(192.168.1.55 192.168.1.67 192.168.1.10);
foreach @test {
print "$_\n";
}
还是不行。。。。。。
我也汗了
我错了
@test要加括号
(@test)即可
您对本贴的看法:
鲜花[0]
臭蛋[0]
__________________________________
其实我只是一架人肉搜索引擎
CU可用积分兑换Linux/Unix精品图书
|
《Ubuntu标准教程》书评获奖名单公布
cobrawgl
大天使
UID:143379
注册:2004-3-18
最后登录: 2008-07-06
帖子:
1744
精华:0
可用积分:1038
信誉积分:
100
专家积分:
46
(本版)
状态:
...离线...
[
个人空间
] [
短信
] [
博客
]
3楼
发表于 2008-5-15 12:24
您对本贴的看法:
鲜花[0]
臭蛋[0]
__________________________________
爱生活
爱Perl
爱BSD
:-)
CU可用积分兑换Linux/Unix精品图书
|
《Ubuntu标准教程》书评获奖名单公布
hfahe
侠客
UID:704480
注册:2008-5-13
最后登录: 2008-07-03
帖子:
26
精华:0
可用积分:26
信誉积分:
0
专家积分:
0
(本版)
状态:
...离线...
[
个人空间
] [
短信
] [
博客
]
4楼
发表于 2008-5-15 13:58
数组?
my @localaddrs = qw/127.0.0.1 127.0.0.2 127.0.0.3/;
您对本贴的看法:
鲜花[0]
臭蛋[0]
CU可用积分兑换Linux/Unix精品图书
|
《Ubuntu标准教程》书评获奖名单公布
ppiqq
精灵王
UID:631513
注册:2007-10-22
最后登录: 2008-07-03
帖子:
297
精华:0
可用积分:18
信誉积分:
215
专家积分:
0
(本版)
状态:
...离线...
[
个人空间
] [
短信
] [
博客
]
5楼
发表于 2008-5-15 15:49
谢谢大家
也就是说如何使用perl实现类似C下面的对于数组的 for循环
您对本贴的看法:
鲜花[0]
臭蛋[0]
CU可用积分兑换Linux/Unix精品图书
|
《Ubuntu标准教程》书评获奖名单公布
churchmice
风云使者
数字小白
UID:664989
注册:2008-1-23
最后登录: 2008-07-04
帖子:
457
精华:0
可用积分:973
信誉积分:
0
专家积分:
7
(本版)
状态:
...离线...
[
个人空间
] [
短信
] [
博客
]
6楼
发表于 2008-5-15 16:33
QUOTE:
原帖由
ppiqq
于 2008-5-15 15:49 发表
谢谢大家
也就是说如何使用perl实现类似C下面的对于数组的 for循环
perl下面不仅有for,还有foreach
遍历一个数组的话可以用如下方法:
[Copy to clipboard]
[
-
]
CODE:
foreach ( @array ) {
print "$_\n";
}
[Copy to clipboard]
[
-
]
CODE:
for ( my $i =0;$i < @array;$i ++ ) {
print $array[$i],"\n";
}
不用看也知道第一种方式比较简单
[
本帖最后由 churchmice 于 2008-5-15 20:16 编辑
]
您对本贴的看法:
鲜花[0]
臭蛋[0]
__________________________________
其实我只是一架人肉搜索引擎
CU可用积分兑换Linux/Unix精品图书
|
《Ubuntu标准教程》书评获奖名单公布
ppiqq
精灵王
UID:631513
注册:2007-10-22
最后登录: 2008-07-03
帖子:
297
精华:0
可用积分:18
信誉积分:
215
专家积分:
0
(本版)
状态:
...离线...
[
个人空间
] [
短信
] [
博客
]
7楼
发表于 2008-5-15 17:07
楼上的大哥帮忙再看看 我用for循环可以实现 但是使用foreach就不行了
#!/usr/bin/perl
use strict;
my @test=qw(192.168.1.55 192.168.1.67 192.168.1.10);
foreach @array {
print "$_\n";
}
这是全部的程序
报错如下: [anxb@localhost perl]$ ./test
syntax error at ./test line 4, near "foreach @array "
Global symbol "%array" requires explicit package name at ./test line 4.
Execution of ./test aborted due to compilation errors.
是不是我落了什么啊?
您对本贴的看法:
鲜花[0]
臭蛋[0]
CU可用积分兑换Linux/Unix精品图书
|
《Ubuntu标准教程》书评获奖名单公布
redicaps
圣骑士
UID:564148
注册:2007-5-15
最后登录: 2008-07-02
帖子:
133
精华:0
可用积分:232
信誉积分:
100
专家积分:
0
(本版)
来自:南京/江苏
状态:
...离线...
[
个人空间
] [
短信
] [
博客
]
8楼
发表于 2008-5-15 17:13
一滴汗
@array->(@test)
您对本贴的看法:
鲜花[0]
臭蛋[0]
CU可用积分兑换Linux/Unix精品图书
|
《Ubuntu标准教程》书评获奖名单公布
hitsubunnu
精灵
UID:416407
注册:2006-5-13
最后登录: 2008-07-05
帖子:
244
精华:
1
可用积分:690
信誉积分:
100
专家积分:
0
(本版)
状态:
...离线...
[
个人空间
] [
短信
] [
博客
]
9楼
发表于 2008-5-15 17:19
QUOTE:
原帖由
ppiqq
于 2008-5-15 17:07 发表
楼上的大哥帮忙再看看 我用for循环可以实现 但是使用foreach就不行了
#!/usr/bin/perl
use strict;
my @test=qw(192.168.1.55 192.168.1.67 192.168.1.10);
foreach @array {
print "$_\n";
}
这 ...
多了
您对本贴的看法:
鲜花[0]
臭蛋[0]
CU可用积分兑换Linux/Unix精品图书
|
《Ubuntu标准教程》书评获奖名单公布
churchmice
风云使者
数字小白
UID:664989
注册:2008-1-23
最后登录: 2008-07-04
帖子:
457
精华:0
可用积分:973
信誉积分:
0
专家积分:
7
(本版)
状态:
...离线...
[
个人空间
] [
短信
] [
博客
]
10楼
发表于 2008-5-15 17:20
QUOTE:
原帖由
redicaps
于 2008-5-15 17:13 发表
一滴汗
@array->(@test)
两滴汗
您对本贴的看法:
鲜花[0]
臭蛋[0]
__________________________________
其实我只是一架人肉搜索引擎
CU可用积分兑换Linux/Unix精品图书
|
《Ubuntu标准教程》书评获奖名单公布
首页
»
论坛
»
Perl
»
1
2
››
论坛跳转 ...
> Linux论坛
> BSD
> BSD文档中心
> Solaris
> Solaris文档中心
> 互操作专区
> AIX
> AIX文档中心
> AS400
> HP-UX
> HP文档中心
> SCO UNIX
> SCO文档中心
> Tru64 UNIX
> IRIX
> Mac OS X
> C/C++
> Shell
> Java
> Java文档中心
> Php
> Perl
> Python
> Python文档中心
> Web开发
> 软件工程
> 中间件技术
> GUI编程
> 软件配置管理
> VOIP开发技术
> CPU与编译器
> Ruby
> 网络安全
> 网络技术
> 网络技术文档中心
> 存储备份之家
> 存储文档中心
> 存储业界
> 服务器及硬件技术
> MySQL
> Sybase
> Oracle
> PostgreSQL
> DB2
> Informix
> Web服务器
> Mail服务器
> FTP服务器
> DNS服务器
> Proxy服务器
> LDAP
> VPN
> Lotus
> Samba
> 金融行业
> 电信行业
> 互联网行业
> 制造行业
> 医卫行业
> 教育行业
> 媒体娱乐行业
> 电子政务
> 信息安全
> 交通行业
> IT业界新闻与评论
> IT职业生涯
> IT培训与认证
> IT二手大厅
> IT图书与评论
> 清茶斋
> 投资理财
> 运动地带
> 北京2008奥运专版
> 快乐数码摄影
> 影音文字
> English Forum
> 游戏玩家
> 旅游天下
> IT爱车族
> CU活动专区
> 站务交流
> 博客站务交流区
> 下载频道交流区
> 空间圈子交流区
控制面板首页
编辑个人资料
积分交易
公众用户组
好友列表
个人空间管理
升级个人空间
基本概况
论坛排行
主题排行
发帖排行
积分排行
管理团队
管理统计
Copyright © 2001-2008 ChinaUnix.net All Rights Reserved 联系我们:
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处
京ICP证041476号
清除 Cookies
-
ChinaUnix
-
Archiver
-
WAP
-
TOP
Processed in 0.069157 second(s), 4 queries , Gzip enabled
控制面板首页
编辑个人资料
积分交易
公众用户组
好友列表
个人空间管理
升级个人空间
基本概况
论坛排行
主题排行
发帖排行
积分排行
管理团队
管理统计