04-23-2015
Grep and rename ?
I have a log file from /m/n/o/A.log with 1 line
current content: 19518634,SW,windows_x86_64
and an folder from /x/y/z/testit_folder
How do you write a shell script to rename test_folder to changed_monthdate_19518634
If today is 04/23 the name should be changed_0423_19518634
Thanks for your help.
Last edited by sabercats; 04-23-2015 at 11:13 PM..
10 More Discussions You Might Find Interesting
1. UNIX for Dummies Questions & Answers
Hi all,
I'm trying to rename a directory of html-files:
index.php?page=start
should become
start.html
I've lost track of all the pipes and brackets and decided I need some help ;-)
Many thanks. (4 Replies)
Discussion started by: TylerDurden
4 Replies
2. UNIX for Dummies Questions & Answers
Hi all
how can can remove the underscore from this number in this series
_1234567.abc
_1234567.abcd
I was trying mv _1234567* 1234567
but did not work ?
thanks
s (2 Replies)
Discussion started by: simon2000
2 Replies
3. UNIX for Dummies Questions & Answers
I have a file named -^, I want to look at it, rename, etc. Any help out there?? (5 Replies)
Discussion started by: nj78
5 Replies
4. Shell Programming and Scripting
hi,
im doin an assignment which requires you to build a shell script to do the MS DOS style equivilant (sp?) of the rename function. What i have to do is a loop which checks the following rules and output messages (same):
Can't have anything after target
Can't have more than one dot
Can't... (1 Reply)
Discussion started by: bohoo
1 Replies
5. Shell Programming and Scripting
Hi Guys,
I need to set the value of $7 to zero in case $7 is NULL. I've tried the below command but doesn't work. Any ideas. thanks guys.
MEM=`ps v $PPID| grep -i db2 | grep -v grep| awk '{ if ( $7 ~ " " ) { print 0 } else { print $7}}' `
Harby. (4 Replies)
Discussion started by: hariza
4 Replies
6. Shell Programming and Scripting
Hi All,
Can you please help me.
The situation is like this. There are many different file name in this directory.
I have to grep all the file that the name start with "PTWO" and rename it to COM with the current date.
This is the script that I have done and it hit an... (16 Replies)
Discussion started by: badbunny9316
16 Replies
7. UNIX for Dummies Questions & Answers
hi guys i am writing a script to change the filename which is enterered as input to lower case letter even if one letter is upper case i have to change it to lower case
i get the input and use
sed comand should i use like that
sed/s/a-z/A-Z/d
will it be like that can u please help me (8 Replies)
Discussion started by: farhan_t49
8 Replies
8. UNIX for Dummies Questions & Answers
I want to rename files
Files show like this
1977SSD_rsdtst.pdf
1976SDP_rstdtsr.pdf
1943FDT_rstdsrt.pdf
1996DFF_stdstrd.pdf
I want to introduce _ after the year, and move the characters to the end
to get
1977_rsdtst_SSD.pdf
1976_rstdtsr_SDP.pdf
1943_rstdsrt_FDT.pdf... (4 Replies)
Discussion started by: kristinu
4 Replies
9. Shell Programming and Scripting
i have this line of code that looks for the same file if it is currently running and returns the count.
`ps -eaf -o args | grep -i sfs_pcard_load_file.ksh | grep -v grep | wc -l`
basically it is assigned to a variable
ISRUNNING=`ps -eaf -o args | grep -i sfs_pcard_load_file.ksh |... (6 Replies)
Discussion started by: wtolentino
6 Replies
10. Shell Programming and Scripting
Renaming files using rename on the following files
rename 's/.99999/.99999.sac.pzs/g' *.99999
sac_pzs_iv_esml_hhz__2013.074.10.18.23.0000_2599.365.23.59.59.99999
sac_pzs_iv_favr_hhe__2010.187.00.00.00.0000_2599.365.23.59.59.99999... (1 Reply)
Discussion started by: kristinu
1 Replies
LEARN ABOUT DEBIAN
poe::filter::grep
POE::Filter::Grep(3pm) User Contributed Perl Documentation POE::Filter::Grep(3pm)
NAME
POE::Filter::Grep - select or remove items based on simple rules
SYNOPSIS
#!perl
use POE qw(
Wheel::FollowTail
Filter::Line Filter::Grep Filter::Stackable
);
POE::Session->create(
inline_states => {
_start => sub {
my $parse_input_as_lines = POE::Filter::Line->new();
my $select_sudo_log_lines = POE::Filter::Grep->new(
Put => sub { 1 },
Get => sub {
my $input = shift;
return $input =~ /sudo[d+]/i;
},
);
my $filter_stack = POE::Filter::Stackable->new(
Filters => [
$parse_input_as_lines, # first on get, last on put
$select_sudo_log_lines, # first on put, last on get
]
);
$_[HEAP]{tailor} = POE::Wheel::FollowTail->new(
Filename => "/var/log/system.log",
InputEvent => "got_log_line",
Filter => $filter_stack,
);
},
got_log_line => sub {
print "Log: $_[ARG0]
";
}
}
);
POE::Kernel->run();
exit;
DESCRIPTION
POE::Filter::Grep selects or removes items based on simple tests. It may be used to filter input, output, or both. This filter is named
and modeled after Perl's built-in grep() function.
POE::Filter::Grep is designed to be combined with other filters through POE::Filter::Stackable. In the "SYNOPSIS" example, a filter stack
is created to parse logs as lines and remove all entries that don't pertain to a sudo process. (Or if your glass is half full, the stack
only selects entries that DO mention sudo.)
PUBLIC FILTER METHODS
In addition to the usual POE::Filter methods, POE::Filter::Grep also supports the following.
new
new() constructs a new POE::Filter::Grep object. It must either be called with a single Code parameter, or both a Put and a Get parameter.
The values for Code, Put, and Get are code references that, when invoked, return true to select an item or false to reject it. A Code
function will be used for both input and output, while Get and Put functions allow input and output to be filtered in different ways. The
item in question will be passed as the function's sole parameter.
sub reject_bidoofs {
my $pokemon = shift;
return 1 if $pokemon ne "bidoof";
return;
}
my $gotta_catch_nearly_all = POE::Filter::Grep->new(
Code => &reject_bidoofs,
);
Enforce read-only behavior:
my $read_only = POE::Filter::Grep->new(
Get => sub { 1 },
Put => sub { 0 },
);
modify
modify() changes a POE::Filter::Grep object's behavior at run-time. It accepts the same parameters as new(), and it replaces the existing
tests with new ones.
# Don't give away our Dialgas.
$gotta_catch_nearly_all->modify(
Get => sub { 1 },
Put => sub { return shift() ne "dialga" },
);
SEE ALSO
POE::Filter for more information about filters in general.
POE::Filter::Stackable for more details on stacking filters.
BUGS
None known.
AUTHORS & COPYRIGHTS
The Grep filter was contributed by Dieter Pearcey. Documentation is provided by Rocco Caputo.
Please see the POE manpage for more information about authors and contributors.
perl v5.14.2 2012-05-15 POE::Filter::Grep(3pm)