查看Perl笔记的源代码
←
Perl笔记
跳转到:
导航
,
搜索
因为以下原因,你没有权限编辑本页:
您刚才请求的操作只有这个用户组中的用户才能使用:
用户
您可以查看并复制此页面的源代码:
== vec == <source lang=perl> $ cat test.pl #!/usr/bin/perl my $seed = 0x52546264; my $id = sprintf("%08x", $seed); printf "id = %s\n", $id; printf "vec(id, 2, 8) = %u\n", vec($id, 2, 8); printf "vec(id, 2, 8) = %s\n", chr(vec($id, 2, 8)); $ ./test.pl id = 52546264 vec(id, 2, 8) = 53 vec(id, 2, 8) = 5 </source> vec 将字符串 "52546264",8位一个单位,从0开始标号,最左8位为0,其次为1。序号2对应的8位值为 53,此为字符 '5' 的 ASCII 码值 <br><br>
返回到
Perl笔记
。
个人工具
登录
名字空间
页面
讨论
变换
查看
阅读
查看源代码
查看历史
操作
搜索
导航
首页
社区专页
新闻动态
最近更改
随机页面
帮助
工具箱
链入页面
相关更改
特殊页面