8 More Discussions You Might Find Interesting
1. What is on Your Mind?
Thank You Patreon Sponsors!
We are using your generous sponsorship dollars for software and media licensing. Your patronage is greatly appreciated!
Currently, we are working on new tech videos on the YouTube YT channel, which is the new official media channel for unix.com.
... (0 Replies)
Discussion started by: Neo
0 Replies
2. Shell Programming and Scripting
I have a file and when I match the word "initiators" in the first column I need to be able to print the rest of the columns in that row. This is fine for the most part but on occasion the "initiators" line gets wrapped to the next line. Here is a sample of the file.
caw-enabled ... (3 Replies)
Discussion started by: kieranfoley
3 Replies
3. Shell Programming and Scripting
in ksh.
Here is what I have working thanks to all of you. Now I need to take it one step further. The $result value needs to be in the $0000.00 format instead of what it is now, 000000. Yes, it is always 6 characters, I thought this would help but so far it has baffled me.
My thought... (3 Replies)
Discussion started by: CougarMutt
3 Replies
4. Shell Programming and Scripting
I'm writing a wrapper script (in bash) that wraps another (bash) script. When calling the wrapped script, I need to pass all the received arguments/options to it. Is there a built in variable that holds all the options? I wrote a little while loop (see below) which works. But I wanted to know if... (1 Reply)
Discussion started by: Dilbert
1 Replies
5. Shell Programming and Scripting
Hello,
I am about 3 weeks new to CGI/ Perl scripting and so far some concepts I can wrap my head around perfectly but others not so much.
I was wondering if I could get some help in making a script that will pull from a text file and put back into a form. I can make a script that takes input... (15 Replies)
Discussion started by: sennex
15 Replies
6. UNIX for Advanced & Expert Users
I need to convert a file i.e
cat list
1000:
1001:
1002:
to
cat wrappedfile 1000:1001:1002:
currently I am using a while loop, paste and mv command to achieve desired outcome.
touch wrappedfile
cat list | while read line ;do echo $line > /tmp/$line;paste /tmp/$line wrappedfile >... (7 Replies)
Discussion started by: jouuu
7 Replies
7. UNIX for Dummies Questions & Answers
I have a file abc:
line 1
line 2
line 3
line 4
And I am successfully e-mailing the file, with this:
mail -s "contents of abc" jdoe@email.com <<EOF
cat abc
EOF
But the e-mail shows up looking like this:
subject: contents of abc
line 1 line 2 line 3 line 4
The carriage returns... (5 Replies)
Discussion started by: tumblez
5 Replies
8. Shell Programming and Scripting
Hi,
Can someone tell me how i can merge the lines that are wrapped.
My file has content somethig like this
Line1 -> xxxx bbbb ccc dddd bababab11
Line2 -> 2222 nnn cccc
Line 3-> yyyyy zzzz uuzuz ioouo oououou11
Line 4 -> 3333 pppp dddd
Line 5-> zzzz kjkj uuzuz ioouo oououou11
Line 6->... (1 Reply)
Discussion started by: braindrain
1 Replies
Wanted(3pm) User Contributed Perl Documentation Wanted(3pm)
NAME
File::Find::Wanted - More obvious wrapper around File::Find
VERSION
Version 1.00
SYNOPSIS
File::Find is a great module, except that it doesn't actually find anything. Its "find()" function walks a directory tree and calls a
callback function. Unfortunately, the callback function is deceptively called "wanted", which implies that it should return a boolean
saying whether you want the file. That's not how it works.
Most of the time you call "find()", you just want to build a list of files. There are other modules that do this for you, most notably
Richard Clamp's great File::Find::Rule, but in many cases, it's overkill, and you need to learn a new syntax.
With the "find_wanted" function, you supply a callback sub and a list of starting directories, but the sub actually should return a boolean
saying whether you want the file in your list or not.
To get a list of all files ending in .jpg:
my @files = find_wanted( sub { -f && /.jpg$/ }, $dir );
For a list of all directories that are not CVS or .svn:
my @files = find_wanted( sub { -d && !/^(CVS|.svn)$/ }, $dir ) );
It's easy, direct, and simple.
WHY DO THIS
?
The cynical may say "that's just the same as doing this":
my @files;
find( sub { push @files, $File::Find::name if -f && /.jpg$/ }, $dir );
Sure it is, but File::Find::Wanted makes it more obvious, and saves a line of code. That's worth it to me. I'd like it if find_wanted()
made its way into the File::Find distro, but for now, this will do.
FUNCTIONS
find_wanted( &wanted, @directories )
Descends through @directories, calling the wanted function as it finds each file. The function returns a list of all the files and
directories for which the wanted function returned a true value.
This is just a wrapper around "File::Find::find()". See File::Find for details on how to modify its behavior.
COPYRIGHT & LICENSE
Copyright 2005-2012 Andy Lester.
This program is free software; you can redistribute it and/or modify it under the terms of the Artistic License v2.0.
perl v5.14.2 2012-06-08 Wanted(3pm)