Re: lwall snippet

Etienne Grossmann <[email protected]>
Newsgroups gmane.comp.lang.perl.fun
Message-ID <[email protected]>
  Hi all,


your 2004 'last' probably doesn't produce the same output as his 1991
'last'.

  I may be wrong, but $_ x= should just duplicate $_ the number of
times on the rhs, which is 0 or 1. That is, it leaves $_ unchanged, or
it sets it to "". That is, the line acts as a grep.

  Replacing (.*) by (..:..) would make $1 and $2 represent hours w/
last-2004. 

  The other conditions in the rhs I don't grok.

  Hth,

  Etienne

PS : Wasn't this code commented?

On Sat, Apr 10, 2004 at 08:56:26PM -0400, [email protected] wrote:
# 
# I recently came across this impenetrable Wall code:
# 
#   last|perl -pe '$_ x=/(..:..)...(.*)/&&"'$1'"ge$1&&"'$1'"lt$2'
#   That's gonna be tough for Randal to beat...  :-)
#            -- Larry Wall in  <[email protected]>
# 
# What on earth does this do?  I get no output when I run it on my Linux
# system.  ( >*gulp*< )
# 
# Is there any tool that would help decoding this thing?
# 
# Thanks,
# 
# kj

-- 
Etienne Grossmann ------ http://www.cs.uky.edu/~etienne
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.