额外的库

在这一节中的库不再被认为是Penlight的核心部分，但在需要时，仍提供专门的功能。

简单的输入的模式

Lua 的字符串模式匹配是非常强大，通常您将不需要传统的正则表达式库。即便如此，有时 Lua 代码结束看上去像 Perl，因为字符串模式不容易阅读，尤其是对普通读者而言。这段代码需要了解三种不同的日期格式：

 -- parsing dates using Lua string patterns

 months={Jan=1,Feb=2,Mar=3,Apr=4,May=5,Jun=6,

 Jul=7,Aug=8,Sep=9,Oct=10,Nov=11,Dec=12}

 function check_and_process(d,m,y)

     d = tonumber(d)

     m = tonumber(m)

     y = tonumber(y)

     ....

 end

 for line in f:lines() do

     -- ordinary (English) date format

     local d,m,y = line:match('(%d+)/(%d+)/(%d+)')

     if d then

         check_and_process(d,m,y)

     else -- ISO date??

         y,m,d = line:match('(%d+)%-(%d+)%-(%d+)')

         if y then

             check_and_process(d,m,y)

         else -- <day> <month-name> <year>?

             d,mm,y = line:match('%(d+)%s+(%a+)%s+(%d+)')

             m = months[mm]

             check_and_process(d,m,y)

         end

     end

 end

这些不是特别困难的模式，但典型问题已经出现，例如，不得不转义 ' — '。此外， string.match返回其捕获，这样，我们被迫使用略显尴尬的嵌套的 if 语句。

验证码检验问题，使用正则表达式的人试图强制约束 （如一年不能超过四位数） 。我们应该享受匹配，而不是拿着锤子砸自己。

pl.sip提供了简单、 直观的方式来检测字符串中的模式和提取的相关部分。

 > sip = require 'pl.sip'

 > dump = require('pl.pretty').dump

 > res = {}

 > c = sip.compile 'ref=$S{file}:$d{line}'

 > = c('ref=hello.c:10',res)

 true

 > dump(res)

 {

   line = 10,

   file = "hello.c"

 }

 > = c('ref=long name, no line',res)

 false

sip.compile可以从给定字符串和表创建一个模式匹配器函数。如果匹配字符串，则返回true ，根据模式中命名字段填充该表。

这里是另一个版本的日期分析器：

 -- using SIP patterns

 function check(t)

     check_and_process(t.day,t.month,t.year)

 end

 shortdate = sip.compile('$d{day}/$d{month}/$d{year}')

 longdate = sip.compile('$d{day} $v{mon} $d{year}')

 isodate = sip.compile('$d{year}-$d{month}-$d{day}')

 for line in f:lines() do

     local res = {}

     if shortdate(str,res) then

         check(res)

     elseif isodate(str,res) then

         check(res)

     elseif longdate(str,res) then

         res.month = months[res.mon]

         check(res)

     end

 end

SIP 模式以'$'开始 ，之后跟着单字母类型，后面大括号中的是可选变量。

 Type    Meaning

 v         variable, or identifier.

 i          possibly signed integer

 f          floating-point number

 r          'rest of line'

 q         quoted string (either ' or ")

 p         a path name

 (         anything inside (...)

 [         anything inside [...]

 {         anything inside {...}

 <         anything inside <...>

 [---------------------------------]

 S         non-space

 d         digits

 ...

如果类型不是 v、 i、 f、 r 或 q 之一，它被假定为标准 Lua 字符。你在模式中的任何空格将匹配任意数目的空格。'神奇' 字符串中的任何字符均被转义。

SIP 捕获 （像$v{mon}) 不需要进行命名。您可以使用只是$v，但你必须保持一致 ；如果一种模式包含未命名的捕获，然后所有捕获必须都是未命名。在这种情况下，结果表是一个简单的值列表。

sip.match是有用的快捷方式，如果你喜欢你 '占位' 。（它将缓存结果，所以它比显式用sip.compile快些.)

 > sip.match('($q{first},$q{second})','("john","smith")',res)

 true

 > res

 {second='smith',first='john'}

 > res = {}

 > sip.match('($q,$q)','("jan","smit")',res)  -- unnamed captures

 true

 > res

 {'jan','smit'}

 > sip.match('($q,$q)','("jan", "smit")',res)

 false   ---> oops! Can't handle extra space!

 > sip.match('( $q , $q )','("jan", "smit")',res)

 true

作为一般规则，允许您模式中的空白。

最后，放在模式的结尾的 '$' 意味着 '捕获的在第一个非空格开头的行。

 > sip.match('( $q , $q ) $','("jan", "smit") and a string',res)

 true

 > res

 {'jan','smit','and a string'}

 > res = {}

 > sip.match('( $q{first} , $q{last} ) $','("jan", "smit") and a string',res)

 true

 > res

 {first='jan',rest='and a string',last='smit'}

命令行程序与 Lapp

pl.lapp是小而专注的Lua 模块，它的目的是要使标准命令行解析更方便和直观。它实现了 GNU 风格，即以短横线'-'或长横线' --'开始的字母。一般带参数的选项期望找到下一个输入作为它的参数 （例如 ' gcc test.c -o test'），单个短选项可以忽略空格 (例如 'head  -n4  test.c' 或gcc   -I/usr/include/lua/5.1 …)

Lapp 尽其可能将参数转换为等效的 Lua 类型，即转换数字、文件名转换为文件对象。如果任何转换失败，或缺少所需的参数，则将发出错误消息、 并用文本输出。所以有两个必要的任务，提供的标志和选项的名字，并将它们和类型关联。

对于任何非平凡的脚本，或仅为了个人消遣，有必要提供使用说明。Lapp 的新颖性是定义了松散格式的字符串用法，而且可以指定参数的名称和类型。

示例：

 -- scale.lua

   lapp = require 'pl.lapp'

   local args = lapp [[

   Does some calculations

     -o,--offset (default 0.0)  Offset to add to scaled number

     -s,--scale  (number)  Scaling factor

      <number> (number )  Number to be scaled

   ]]

   print(args.offset + args.scale * args.number)

这里是在命令行的会话中使用此脚本：

 $ lua scale.lua

 scale.lua:missing required parameter: scale

 Does some calculations

  -o,--offset (default 0.0)  Offset to add to scaled number

  -s,--scale  (number)  Scaling factor

   <number> (number )  Number to be scaled

 $ lua scale.lua -s 2.2 10

 22

 $ lua scale.lua -s 2.2 x10

 scale.lua:unable to convert to number: x10

 ....(usage as before)

有两种类型的 Lapp 用法让字符串更有意义。短选项，可以选择其相应的长选项。可遵循括号中的类型说明符。同样，以 '<'  PARMETER ' >' 开头的参数行，后面跟着的是类型说明符。类型说明符是任一形式'(默认是 'VALUE')' 或 '(' TYPE')' ；默认的说明符意味着选项或参数有默认值，并不是必需的。类型是一个 '字符串'、 '数'、 '文件输入' 或 '文件输出' ；VALUE是一个数字，（'stdin'、 'stdout'、 'stderr') 之一或者是标记。这行的其余不会被分析，可以用作注释。

此脚本在输出表中显示的字段与指定的参数名称之间的关系。

 -- simple.lua

 local args = require ('pl.lapp') [[

 Various flags and option types

   -p          A simple optional flag, defaults to false

   -q,--quiet  A simple flag with long name

   -o  (string)  A required option with argument

   <input> (default stdin)  Optional input file parameter

 ]]

 for k,v in pairs(args) do

     print(k,v)

 end

上面显示了args表的所有参数 ；请注意，args.quiet 已经成为为 true，因为它被指定 ；args.p 默认为 false。如果有一个长命名选项，它将在选项中用作局部名称。因为默认的类型是布尔类型，对于简单的标志，它的类型或默认值不是必须的。

 $ simple -o test -q simple.lua

 p       false

 input   file (781C1BD8)

 quiet   true

 o       test

 input_name      simple.lua

 D:\dev\lua\lapp>simple -o test simple.lua one two three

 1       one

 2       two

 3       three

 p       false

 quiet   false

 input   file (781C1BD8)

 o       test

 input_name      simple.lua

参数输入已设置为打开的只读文件对象 — — 我们知道它必须是一个只读的文件，因为它是默认值的类型。input_name字段会自动生成 ，因为它经常用来访问原始文件名。

请注意，提供的任意额外参数会放到整数索引表里，即 args [i] ，i表示1 到 #args 之间的值。

对有良好定义和明确任务的短脚本，文件真的不必显式关闭，因为垃圾收集文件对象的结果就是关闭它们。