Chinaunix

标题: sed程序实现乘法 [打印本页]
作者: ly5066113    时间: 2010-08-14 12:16
标题: sed程序实现乘法
本帖最后由 ly5066113 于 2010-08-18 20:21 编辑
  1. ly5066113@ubuntu:~$ sed --version
  2. GNU sed version 4.1.5
  3. Copyright (C) 2003 Free Software Foundation, Inc.
  4. This is free software; see the source for copying conditions.  There is NO
  5. warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE,
  6. to the extent permitted by law.
  7. ly5066113@ubuntu:~$ echo '123456789 * 123456789' | sed -f mult.sed
  8. 15241578750190521
  9. ly5066113@ubuntu:~$ expr 123456789 \* 123456789
  10. 15241578750190521
  11. ly5066113@ubuntu:~$ echo '123456789123456789 * 123456789' | sed -f mult.sed
  12. 15241578765432099750190521
  13. ly5066113@ubuntu:~$ expr 123456789123456789 \* 123456789
  14. expr: *: Numerical result out of range
  15. ly5066113@ubuntu:~$ echo '123456789123456789 * 123456789' | bc
  16. 15241578765432099750190521
复制代码
数字越大，计算时间越长，但位数是没有上限的。
没有使用GNU拓展，UNIX下也可以使用。
  1. #! /usr/bin/sed -f

  3. s/ *//g
  4. s/\*/;/
  5. s/\([0-9]\)\([0-9]\);/\1a\2;/
  6. s/\([0-9]\)\([0-9]\)$/\1a\2/
  7. : a
  8.         s/\([0-9]\)\([0-9]\)\(aa*\)/\1a\3\2\3/
  9. t a
  10. h
  11. : b
  12. /;$/!{
  13.         s/\(.*\)\([0-9]\)\(a*\);\(.*\)\([0-9]\)\(a*\)$/\2*\5\3\6,\1;\4\5\6/
  14.         t b
  15.         s/;.*//
  16.         x
  17.         s/[0-9]a*$//
  18.         x
  19.         G
  20.         b b
  21. }
  22. s/,\n.*//
  23. s/$/;0*0=0;0*1=0;0*2=0;0*3=0;0*4=0;0*5=0;0*6=0;0*7=0;0*8=0;0*9=0;1*1=1;1*2=2;1*3=3;1*4=4;1*5=5;1*6=6;1*7=7;1*8=8;1*9=9;2*2=4;2*3=6;2*4=8;2*5=10;2*6=12;2*7=14;2*8=16;2*9=18;3*3=9;3*4=12;3*5=15;3*6=18;3*7=21;3*8=24;3*9=27;4*4=16;4*5=20;4*6=24;4*7=28;4*8=32;4*9=36;5*5=25;5*6=30;5*7=35;5*8=40;5*9=45;6*6=36;6*7=42;6*8=48;6*9=54;7*7=49;7*8=56;7*9=63;8*8=64;8*9=72;9*9=81;/
  24. : c
  25.         s/\([0-9]\*[0-9]\)\(.*\)\(;\1=\)\([0-9][0-9]*\)/\4\2\3\4/
  26. t c
  27. /^[^;]*\*/{
  28.         s/\([0-9]\)\*\([0-9]\)/\2*\1/
  29.         b c
  30. }
  31. s/;.*//
  32. s/a/0/g
  33. h
  34. : d
  35. /^[0-9]*$/!{
  36.         s/,/-/
  37.         s/,.*//
  38.         s/$/-;9aaaaaaaaa98aaaaaaaa87aaaaaaa76aaaaaa65aaaaa54aaaa43aaa32aa21a100/
  39.         : e
  40.         /^--[^a]/!{
  41.                 s/^\([0-9a]*\)\([0-9]\)-\([^-]*\)-\(.*;.*\2\(a*\)\2.*\)/\1-\3-\5\4/
  42.                 s/^\([^-]*\)-\([0-9a]*\)\([0-9]\)-\(.*;.*\3\(a*\)\3.*\)/\1-\2-\5\4/
  43.                 s/-\(aaaaaaaaa\(a\)\)\{0,1\}\(a*\)\([0-9]*;.*\([0-9]\)\3\5\)/-\2\5\4/
  44.                 b e
  45.         }
  46.         s/^--\([^;]*\);.*/\1/
  47.         G
  48.         s/\n[0-9]*,[0-9]*//
  49.         h
  50.         b d
  51. }
复制代码
作者: ywlscpl    时间: 2010-08-14 12:27
tim佳作不断
作者: justlooks    时间: 2010-08-14 12:31
这个看的我头皮发麻
作者: bbgg1983    时间: 2010-08-14 12:33
sed原来也可以如此虚幻！
作者: 网中淫    时间: 2010-08-14 12:37
德艺双馨，一代宗师！
作者: iori809    时间: 2010-08-14 13:15
一定要收藏
作者: bbgg1983    时间: 2010-08-16 10:36
up
作者: Shell_HAT    时间: 2010-08-16 10:55
向Tim哥学习
作者: rdcwayx    时间: 2010-08-16 12:17
版主应该给TIM个置顶贴，让他可以随时放些更新的东西。
作者: expert1    时间: 2010-08-16 15:11

膜拜之，但学习不了，还是expr,bc适合我。
作者: 好看的附件    时间: 2010-08-16 15:12
膜拜~~，可惜没分。。
作者: badb0y    时间: 2010-08-16 15:31
太强了
作者: blackold    时间: 2010-08-17 10:29
Tim牛啊，学习学习！
作者: BangBull    时间: 2010-08-18 09:44
作者: nxlinux    时间: 2010-08-18 10:07
什么内容？
作者: ztkx    时间: 2010-08-18 13:46
[code]ly5066113@ubuntu:~$ uname -a
Linux ubuntu 2.6.24-22-generic #1 SMP Mon Nov 24 19:35:06 UTC 2008 x86_64 GNU/Linux
ly5066113@ubuntu:~$ sed --version
GNU sed version 4.1.5
Copyright (C) 2003 Free Software Foundation, Inc.
This is free software; see the s

内容呢
作者: ly5066113    时间: 2010-08-18 20:24
回复 16# ztkx


不好意思，可能是网络不好的时候编辑了。
现在补上了。
作者: expert1    时间: 2010-08-19 09:42


真是佩服得五体投地啊。脚本搞到这样的地步，perl等不看也能顺利做SA了
作者: bright_mac    时间: 2010-08-19 14:36
膜拜！
作者: cjaizss    时间: 2011-01-09 11:40
我刚想趁今天心情不佳在家写个sed，想起以前Tim好象写过，于是找出来，加个精吧
作者: xiaopan3322    时间: 2011-01-09 11:54
服了，收藏之…
作者: ly5066113    时间: 2011-01-09 13:32
回复 20# cjaizss


感谢版主加精。
有空可以写减法、除法，难度更大。
作者: cjaizss    时间: 2011-01-09 13:34
回复  cjaizss


感谢版主加精。
有空可以写减法、除法，难度更大。
ly5066113 发表于 2011-01-09 13:32



    减法应该还好，我上次实现的加法执行起来太慢了，还是用1累加升位比较快。
   除法，我的想法是转为二进制来做
作者: ly5066113    时间: 2011-01-09 13:39
回复 23# cjaizss


期待，除法我还没什么好思路。
作者: cjaizss    时间: 2011-01-09 13:50
回复  cjaizss


期待，除法我还没什么好思路。
ly5066113 发表于 2011-01-09 13:39



    我试试看吧，比较难写，不见得可以写出来



欢迎光临 Chinaunix (http://bbs.chinaunix.net/) Powered by Discuz! X3.2