利用正则匹配内容直接赋值


ken@ken-PC:~$ who

ken tty7 2012-02-09 08:49 (:0)
ken pts/0 2012-02-09 16:51 (:0.0)

my (%ttys,$user,$tty,$data);

for (`who`){

  ($user,$tty,$data)= /(\S+)\s+(\S+)\s+(.*)/;

  $ttys{$user} .= "$tty at $data\n";

}

优质内容筛选与推荐>>
1、.NET 性能优化方法总结
2、Unity赛车游戏之移动
3、Oracle存储1.1
4、[转载] 七龙珠第一部——第008话 龟仙人的龟派气功波
5、思燕


长按二维码向我转账

受苹果公司新规定影响,微信 iOS 版的赞赏功能被关闭,可通过二维码转账支持公众号。

    阅读
    好看
    已推荐到看一看
    你的朋友可以在“发现”-“看一看”看到你认为好看的文章。
    已取消,“好看”想法已同步删除
    已推荐到看一看 和朋友分享想法
    最多200字,当前共 发送

    已发送

    朋友将在看一看看到

    确定
    分享你的想法...
    取消

    分享想法到看一看

    确定
    最多200字,当前共

    发送中

    网络异常,请稍后重试

    微信扫一扫
    关注该公众号