10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hi
I search for certain values in a file across many directories using the following awk code
awk '/Sl.*thickness/ {Sl=$3;Tt=$NF}END{print Sl, Tt}' DILAT.DAT
What I would like to do is write out Sl and Tt obtained from these files from many directories to a single file. So for example if... (2 Replies)
Discussion started by: lost.identity
2 Replies
2. Shell Programming and Scripting
Following is the code:
------------------------------
a=100
b=200
c=300
touch testfl.txt.gz
chmod 664 testfl.txt.gz
echo $a|gzip >> "testfl.txt.gz"
echo $b|gzip >> "testfl.txt.gz"
echo $c|gzip >> "testfl.txt.gz"
------------------------------
There is a requirement as follows.
I need... (1 Reply)
Discussion started by: kmanivan82
1 Replies
3. Shell Programming and Scripting
I have a file which has data in the below format:
7810902|6783014102| || |0| |0| |0| |0|||||T|04/13/2006||9423|7421||100|2006-04-13 16:50:28|||2006-04-13 16:50:28|n|51|-1||214
1089929|||||NewSpCreateAction request successful. Activity ID = <826528>||||100|n|2006-04-13 16:50:27|2006-04-13... (3 Replies)
Discussion started by: ankianand88
3 Replies
4. Shell Programming and Scripting
I have a script which has to be scheduled to run 3 times a day.
My script picks the required fields from logfile and stores the data in a.csv file.
Sample data.
my logfile contain:
0097A,0374D,100903,1519,00000606191
0097A,C88RA,100903,0724,00000606105
So the output of first execution... (3 Replies)
Discussion started by: shrima.pratima
3 Replies
5. Shell Programming and Scripting
hai..i am new to unix..and i've currently learn shell script..
i have this small problem where i would like to save every data from log file into user directory if the data is equal to the name of the user..
i manage to do that with below script..
i would like to ask if there is any solutions so... (1 Reply)
Discussion started by: meggae
1 Replies
6. Shell Programming and Scripting
I have an xml file data as shown below:
<impl name="Nortel" is-enabled="true">
<package-mappings>
<const-mapping target-state="EndPoint"
target-param="cfCNDSubscribed" constant-value="true"/>
<const-mapping... (2 Replies)
Discussion started by: ravi_rn
2 Replies
7. UNIX for Dummies Questions & Answers
i want to develop a script newdata that writes new data to a file called items
the file items has the following headings columns separated by tabs:
channel date time programe
if i type executable file newdata on the command line with parameters, it should append it to the items files
the... (1 Reply)
Discussion started by: fletcher
1 Replies
8. UNIX for Dummies Questions & Answers
One of the fortunate things about posting in a "Dummies" forum is you probably aren't expecting a lot of out me...
I'm trying to pull fields from two lines in the same file(s), and then append them together in a new file.
So...I get a nice line-by-line of the first bit of data I'm looking... (6 Replies)
Discussion started by: Milano_EH3
6 Replies
9. Shell Programming and Scripting
Hi,
I need to append the data in to a file by using tab delimiter.
eg:
echo "Data1" >> filename.txt
echo "\t" >> filename.txt (its not working)
echo "Data2" >> filename.txt.
the result sould be like this.
Data1 Data2 (6 Replies)
Discussion started by: Sharmila_P
6 Replies
10. Shell Programming and Scripting
How to get the data from the sybase database and append the data obtained into the file.
For example,
I will get the filename 'temp' from the database. This filename is associated with the number 1.6... This number 1.6 needs to be copied into the file that matches the filename in the... (1 Reply)
Discussion started by: vinay123
1 Replies
Mojo::Log(3pm) User Contributed Perl Documentation Mojo::Log(3pm)
NAME
Mojo::Log - Simple logger
SYNOPSIS
use Mojo::Log;
# Log to STDERR
my $log = Mojo::Log->new;
# Customize log file location and minimum log level
my $log = Mojo::Log->new(path => '/var/log/mojo.log', level => 'warn');
# Log messages
$log->debug("Why isn't this working?");
$log->info("FYI: it happened again");
$log->warn("This might be a problem");
$log->error("Garden variety error");
$log->fatal("Boom!");
DESCRIPTION
Mojo::Log is a simple logger for Mojo projects.
EVENTS
Mojo::Log can emit the following events.
"message"
$log->on(message => sub {
my ($log, $level, @messages) = @_;
...
});
Emitted when a new message gets logged.
$log->unsubscribe('message');
$log->on(message => sub {
my ($log, $level, @messages) = @_;
say "$level: ", @messages;
});
ATTRIBUTES
Mojo::Log implements the following attributes.
"handle"
my $handle = $log->handle;
$log = $log->handle(IO::Handle->new);
Log file handle used by default "message" event, defaults to opening "path" or "STDERR".
"level"
my $level = $log->level;
$log = $log->level('debug');
Active log level, defaults to the value of the "MOJO_LOG_LEVEL" environment variable or "debug".
These levels are currently available:
"debug"
"info"
"warn"
"error"
"fatal"
"path"
my $path = $log->path
$log = $log->path('/var/log/mojo.log');
Log file path used by "handle".
METHODS
Mojo::Log inherits all methods from Mojo::EventEmitter and implements the following new ones.
"new"
my $log = Mojo::Log->new;
Construct a new Mojo::Log object and subscribe to "message" event with default logger.
"debug"
$log = $log->debug('You screwed up, but that is ok');
Log debug message.
"error"
$log = $log->error('You really screwed up this time');
Log error message.
"fatal"
$log = $log->fatal('Its over...');
Log fatal message.
"format"
my $message = $log->format('debug', 'Hi there!');
my $message = $log->format('debug', 'Hi', 'there!');
Format log message.
"info"
$log = $log->info('You are bad, but you prolly know already');
Log info message.
"is_level"
my $success = $log->is_level('debug');
Check log level.
"is_debug"
my $success = $log->is_debug;
Check for debug log level.
"is_error"
my $success = $log->is_error;
Check for error log level.
"is_fatal"
my $success = $log->is_fatal;
Check for fatal log level.
"is_info"
my $success = $log->is_info;
Check for info log level.
"is_warn"
my $success = $log->is_warn;
Check for warn log level.
"log"
$log = $log->log(debug => 'This should work');
Emit "message" event.
"warn"
$log = $log->warn('Dont do that Dave...');
Log warn message.
SEE ALSO
Mojolicious, Mojolicious::Guides, <http://mojolicio.us>.
perl v5.14.2 2012-09-05 Mojo::Log(3pm)
