Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine


by Rhys (Pilgrim)
on Sep 18, 2004 at 17:33 UTC ( #392009=perlquestion: print w/replies, xml ) Need Help??
Rhys has asked for the wisdom of the Perl Monks concerning the following question:

So I've been thinking about writing the aforementioned module, just for the pun. Does anyone have any ideas on what it should do? :-)


P.S. This is a joke. Read the subject lines of the previous two SoPW nodes here and here to get it.

P.P.S. But don't let that stop you from replying! ;-)

Replies are listed 'Best First'.
Re: Mac::Knife
by rlb3 (Deacon) on Sep 18, 2004 at 17:34 UTC
    Killing processes... :)

      Hmm... not bad.

      use Mac::Knife; my $knife = new Mac::Knife(); $knife->slash($pid); # kill -TERM $knife->filet($pid); # kill -KILL $knife->sharpen(); # renice -10 $$



Re: Mac::Knife
by jZed (Prior) on Sep 18, 2004 at 17:40 UTC
    MP3 Ripping?
      Also not bad...

      use Mac::Knife; my $knife = new Mac::Knife( DestDir => './music/mp3s', Source => '/dev/cdrom' ); $knife->cut; # Check it out. Another pun! :-)


        Might Mac::Knife::SwissArmy both kill processes and rip MP3s?

        F o x t r o t U n i f o r m
        Found a typo in this node? /msg me
        % man 3 strfry

                  Re:MP3 Ripping?

        Shouldn't this job be in a Jack::Ripper module ?

            Earth first! (We'll rob the other planets later)

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://392009]
Approved by tye
[Cosmic37]: I guess it is searching for the string "$mydt"
[Corion]: Indeed cool, erix ;)
[Cosmic37]: rather than the value of $mydt which is a date time strong such as 2016-01-01 12:30:56
[Corion]: Cosmic37: No, but maybe $mydt doesn't contain what you think it does, or it contains characters that are special in a regular expression? Try if( $line =~ /\Q$mydt\E/) { ... for a literal match
[Cosmic37]: I mean string grrr
[Corion]: Maybe add an else branch in which you print what the values of $line and $mydt are?
[Cosmic37]: ah thank you I will try
[Cosmic37]: you are right $mydt did not contain what I expected... :-D I will now think :-D
[Cosmic37]: crunch...grind... whirr...gnashing metal crunching cogs...

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (9)
As of 2017-06-29 17:02 GMT
Find Nodes?
    Voting Booth?
    How many monitors do you use while coding?

    Results (673 votes). Check out past polls.