小编Duk*_*eto的帖子

我有一个批处理系统，需要一遍又一遍地运行相同的shell命令。

while (x)
{
  if (y)
  {
    $diff = `diff $f1 $f2`;
    ...
  }
  else
  {
    ...
...

这有点慢，所以我想知道是否有某种方法可以使Shell或程序具有持久性（或其他），以免每次都没有很大的开销。

注意，我不能真正考虑编写自己的diff函数，因为实际输出看起来就像是来自该程序。

提前致谢！

这必须在Perl中完成：

我有大约30_146_890_129和17_181_116_691和21_478_705_663的整数。

这些应该由6个字节组成，其中：

• 字节0-1：值 a
• 字节2-3：值 b
• 字节4-5：值 c

我想隔离出什么是价值a。我如何在Perl中做到这一点？

我试过使用>>运算符：

perl -e '$a = 330971351478 >> 16; print "$a\n";'
5050222

perl -e '$a = 17181116691 >> 16; print "$a\n";'
262163

但是这些数字并不符合我的期望，更像是0-1000。

如果我也能获得价值b，c但我真的不需要那些，那是奖励。

谢谢！