Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot
 
PerlMonks  

marto's scratchpad

by marto (Bishop)
on Jun 02, 2004 at 07:58 UTC ( #359256=scratchpad: print w/replies, xml ) Need Help??

#in .bashrc testfunc(){ $(crontab -l|grep -i $1|perl -lane 'print @F[5..$#F]') } alias myfunc=testfunc

command line:

marto@shemp ~ $ myfunc apache no crontab for marto

For Trace On, a short example, it may not be ideal for your unspecified usage case, but perhaps enough to get you going. If this isn't what you're looking for, it's been a long night. Feel free to post in SoPW:

#!/usr/bin/perl use strict; use warnings; # made up data, name/age my %Beatles = ("John", 31, "Paul", 31, "George", 25, "Ringo", 29); # find all matching keys with the value 31 my @matching_ages = grep { $Beatles{$_} eq '31' } keys %Beatles; print ("$_ \n") foreach @matching_ages;

For To_bz:

#!/usr/bin/perl use strict; use warnings; # here you assign the value "index_out" to $Index_File_Name my $Index_File_Name = "index_out"; warn "Index_File_Name: $Index_File_Name"; # here you assign an undefined value to $Index_File_name # it no longer contains what you think it does. $Index_File_Name = shift; warn "Index_File_Name: $Index_File_Name";

Just get rid of the line $Index_File_Name = shift;. See shift or if you want to have a default output file name if the user does not specify one via the command prompt:

#!/usr/bin/perl use strict; use warnings; my $Index_File_Name = shift || "index_out"; warn "Index_File_Name: $Index_File_Name";

If you run this code the first argument will be the file name, if none is provide "index_out" will be the file name.

I've sent a pull request on github to improve the error message returned. On this site we use code tags when posting so that code and data are readable:

<code> Your code goes here </code>

The following are worth reading: PerlMonks for the Absolute Beginner, How do I post a question effectively?.

Log In?
Username:
Password:

What's my password?
Create A New User
Chatterbox?
[james28909]: another thing, i used to be atheist. life experiences, personal evidence. and my own perception is the reason why i believe the things i do.
[erix]: and now you are agnostic?
[james28909]: arunbear, your picking bits of history to fit your own narrative. right now, humans are smarter than in any of those times.
[james28909]: in order for there to be a mutation, there has to be a universe with laws setup that even allow a mutation.
[james28909]: everything past the first two things you piked from my posts are irrelevant to me and my beliefs. they are side effects.
[james28909]: two or three. if it has to do with how humans are handling said situations, then that is after they were able to evolve into those problems. agnostic means only believe with evidence. i took that from a tyson video

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (17)
As of 2017-12-15 14:53 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    What programming language do you hate the most?




















    Results (433 votes). Check out past polls.

    Notices?