cre16yu (John)

用 Ruby 实现 vbscript 运行时

cre16yu — Sat, 11 Jun 2022 22:07:16 +0800

看了一些简单的 vbscript 脚本，感觉在不用分词器的情况下，通过正则表达式匹配替换和 ruby 的简单的元编程，可以直接运行简单的 vbscript 脚本

因为手头上没有电脑，没法测试。vbscript 因为微软已经放弃 vb6 而且推广 powershell，所以基本上没有新功能的开发

自写全排列算法发现一个性能差异问题

cre16yu — Fri, 02 Oct 2020 18:40:40 +0800

两个 perm 函数都是在进入下一次递归的时候更改 src 数组的某个元素。为什么第一个耗时基本上是第二个耗时的一半呢？

def perm1(n, &block)
  src = (1..n).to_a
  r = []
  scan = lambda do |m|
    if (m == 0)
      block.call(r)
    else
      (0..(src.size-1)).each do |i|
        o = src[i]
        src.delete_at(i) # 删除
        r << o
        scan.call(m-1)

        src.insert(i, o) # 插入
        r.pop
      end
    end
  end
  scan.call(n)

end

def perm2(n, &block)
  src = (1..n).to_a
  r = []
  scan = lambda do |m|
    if (m == 0)
      block.call(r)
    else
      (0..(src.size-1)).each do |i|
        o = src[i]
        next unless o # 检查是否为false

        src[i] = false
        r << o
        scan.call(m-1)

        src[i] = o # 恢复为原数据
        r.pop
      end
    end
  end
  scan.call(n)

end

require 'benchmark'
N = 10

Benchmark.bm do |r|
  r.report do
    cnt = 0
    perm1(N) do |x|
      #~ puts '=>' + x.inspect
      cnt += 1
    end
    puts cnt
  end
  puts '---'
  r.report do
    cnt = 0
    perm2(N) do |x|
      #~ puts '=>' + x.inspect
      cnt += 1
    end
    puts cnt
  end


end

问个正则表达式的更优美写法

cre16yu — Fri, 21 Aug 2020 23:12:40 +0800

text = '[quote][pid=446682464,23044506,4]Reply[/pid] [b]Post by [uid=43110557]掌露成霜[/uid] (2020-08-21 07:54):[/b]<br/><br/>被不被欺负无非是自己选择而已。我小学毕业的时候1米25，扳手腕扳不过全班女生，本来是挺容易被欺负的，然而整个中学生涯都没被人欺负过。<br/>说白了就是审时度势而已，知道没啥武力，平时就温和一些，拿自己掌握的资源最大限度的给自己谋福利。<br/>我曾经拿半套篮球飞人挑班里差生圈中比较面善的混了个脸熟。[/quote]<br/><br/>你真是个人才。'
text.gsub!('<br/>', "\n")
text.gsub!(/\[quote\].*?\[uid.*?\](.*?)\[\/uid\].*?\[\/b\](.*?)\[\/quote\](.*?)/m){|a|
  r = /\[quote\].*?\[uid.*?\](.*?)\[\/uid\].*?\[\/b\](.*?)\[\/quote\](.*?)/m.match(a)
  mid = r[2].gsub("\n", "\n>")
  ">#{r[1]} 说:\n>#{mid}\n#{r[3]}"
}

puts text

把网页文本保存成 markdown，觉得图中写法比较不好，但是用下面这个写法又没有达到把 [quote] 正文每行前加个'>'号的效果。有更优美的写法吗？

text.gsub!(/\[quote\].*?\[uid.*?\](.*?)\[\/uid\].*?\[\/b\](.*?)\[\/quote\](.*?)/m, ">\\1 说:\n>#{"\\2".gsub("\n", "\n>")}\n\\3")
# 不能成功替换

2.7.1 string.encode 参数不正确

cre16yu — Fri, 14 Aug 2020 12:07:19 +0800

版本 ruby2.7.1win64

ret = src.encode('utf-8', 'gbk', {:invalid => '', :replace => ''})

报错，unknown value for invalid character option，无法科学搜索是我一个人的问题吗，赶时间写脚本，已退回到 2.6.5

Ruby 2.7 函数的最后哈希参数应怎么改？

cre16yu — Sun, 19 Jul 2020 12:32:53 +0800

a = b.encode('utf-8', 'gbk', {:invalid => :replace, :undef => :replace, :replace => '?'})  # 强制转换gbk编码的文本

在 Ruby2.7 里警告：warning: Using the last argument as keyword parameters is deprecated.

不是很看得懂 ruby2.7 更新说明的信息，有人可以指导一下这里的代码该怎么改吗？

2.7 发布新闻： https://www.ruby-lang.org/zh_cn/news/2019/12/25/ruby-2-7-0-released/