免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 2345 | 回复: 3
打印 上一主题 下一主题

在perl中怎样将fixed decimal转换成普通的数字类型 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2008-08-03 16:45 |只看该作者 |倒序浏览
兄弟姐妹们,多多指点。小弟新接触这些语言,完全不懂。

我从mvs上ftp get的文件中有fixed decimal类型的数字,怎样在perl中转换成普通的数字类型呢?

论坛徽章:
0
2 [报告]
发表于 2008-08-03 22:18 |只看该作者
大家帮帮忙,小弟先谢过了!

mvs上的fixeddecimal的数值13
普通方式显示如下
..DFTRLR080729       .....    

hex方式显示如下   
44CCEDDDFFFFFF4440000344444444
BB4639390807290000001C00000000

我perl程序将mvs的上文件,ftpget后,先读取文件的最后一行(..DFTRLR080729       .....    ),怎样将fixeddecimal的数值部分转换成普通的数值类型?

论坛徽章:
0
3 [报告]
发表于 2008-08-03 23:09 |只看该作者
为什么13就变成了DFTRLR080729

论坛徽章:
0
4 [报告]
发表于 2008-08-04 21:50 |只看该作者
原帖由 hdc1112 于 2008-8-3 23:09 发表
为什么13就变成了DFTRLR080729

没用过,但不知道是不是可以用 传说中的  “pack” 函数?
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP