05-14-2008
Try adding the -l option -- perl -le 'print ...'
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
I have a file named "suspected" with series of line like these :
{'protocol': 17, 'service': 'BitTorrent KRPC', 'server': '219.78.120.166', 'client_port': 52044, 'client': '10.64.68.44', 'server_port': 8291, 'time': 1226506312L, 'serverhostname': ''}
{'protocol': 17, 'service': 'BitTorrent... (3 Replies)
Discussion started by: rk4k
3 Replies
2. Shell Programming and Scripting
Hi guys,
I know that this topic has been discuss numerous times, and I have search the net and this forum for it.
However, non able to address the problem I faced so far.
I am on Solaris Platform and unable to install additional packages like the GNU date and gawk to make use of their... (5 Replies)
Discussion started by: DrivesMeCrazy
5 Replies
3. UNIX for Advanced & Expert Users
I Have variable $currenttime and I want to display this variable as a TIME FORMAT and the $currenttime value contains like
000000
120000
020000
I want to display to
00:00:00
12:00:00
02:00:00
please help me how to this one (1 Reply)
Discussion started by: gksenthilkumar
1 Replies
4. Shell Programming and Scripting
I have a list of interfaces and time the interface was last active. I can't figure out how to convert the time in the second column,
Fa1/14 0
Se0/0/0 0
Fa1/11 0
Fa1/9 0
Fa1/0 0
Se0/0/1 1240401408
Gi1/0 0
Fa0/0 1240401408
Fa1/3 0
Fa1/8 0
Fa1/15 0
Fa1/13 0
Fa1/10 0
Fa1/1 0
Fa1/12... (7 Replies)
Discussion started by: mrlayance
7 Replies
5. Shell Programming and Scripting
Hi,
Is there any easy way to convert date time(stored in shell variable ) to epoch time in solaris box? As +%s is working on linux but not on solaris, also -d option is not working.
Any suggestion please? (6 Replies)
Discussion started by: anshuman0507
6 Replies
6. AIX
Hello,
Using AIX6.1 box.
I have UTC time value and need to convert it to local time value - I mean time zone and DST should be taken into consideration.
I hope it could be done using shell environment - I don't want to write a program.
thanks
Vilius
---------- Post updated at 02:30 PM... (2 Replies)
Discussion started by: vilius
2 Replies
7. Shell Programming and Scripting
Hello All -
I have a script that grabs data from the net and outputs the following data
46029 46.144 -124.510 2010 07 26 22 50 320 4.0 6.0 2.2 9 6.8 311 1012.1 -0.9 13.3 13.5 13.3 - -
46041 47.353 -124.731 2010 07 26 22 50 250 2.0 3.0 1.6 8 6.4 - 1011.6 - ... (0 Replies)
Discussion started by: drexnefex
0 Replies
8. Shell Programming and Scripting
Dear experts,
I have an epoch time input file such as : -
1302451209564
1302483698948
1302485231072
1302490805383
1302519244700
1302492787481
1302505299145
1302506557022
1302532112140
1302501033105
1302511536485
1302512669550
I need the epoch time above to be converted into real... (4 Replies)
Discussion started by: aismann
4 Replies
9. UNIX Desktop Questions & Answers
Hi All,
I need your help with the following:
My input shows the time in this format 1311547776493
I need to convert it (as part of my AWK script) into this format:
18-08-2011 09:35:11.072
Thanks a lot!
Royi (4 Replies)
Discussion started by: royip
4 Replies
10. Shell Programming and Scripting
Hi guys thanks for the help for my previous posts.Now i have a requirement that i download a XMl file which has UTC time stamp.I need to convert UTC time into Unix server timezone.
For ex if the time zone of unix server is CDT then i need to convert into CDT.whatever may be the system time... (5 Replies)
Discussion started by: mohanalakshmi
5 Replies
LEARN ABOUT DEBIAN
devel::trace
Trace(3pm) User Contributed Perl Documentation Trace(3pm)
NAME
Devel::Trace - Print out each line before it is executed (like "sh -x")
SYNOPSIS
perl -d:Trace program
DESCRIPTION
If you run your program with "perl -d:Trace program", this module will print a message to standard error just before each line is executed.
For example, if your program looks like this:
#!/usr/bin/perl
print "Statement 1 at line 4
";
print "Statement 2 at line 5
";
print "Call to sub x returns ", &x(), " at line 6.
";
exit 0;
sub x {
print "In sub x at line 12.
";
return 13;
}
Then the "Trace" output will look like this:
>> ./test:4: print "Statement 1 at line 4
";
>> ./test:5: print "Statement 2 at line 5
";
>> ./test:6: print "Call to sub x returns ", &x(), " at line 6.
";
>> ./test:12: print "In sub x at line 12.
";
>> ./test:13: return 13;
>> ./test:8: exit 0;
This is something like the shell's "-x" option.
DETAILS
Inside your program, you can enable and disable tracing by doing
$Devel::Trace::TRACE = 1; # Enable
$Devel::Trace::TRACE = 0; # Disable
or
Devel::Trace::trace('on'); # Enable
Devel::Trace::trace('off'); # Disable
"Devel::Trace" exports the "trace" function if you ask it to:
import Devel::Trace 'trace';
Then if you want you just say
trace 'on'; # Enable
trace 'off'; # Disable
TODO
o You should be able to send the trace output to the filehandle of your choice.
o You should be able to specify the format of the output.
o You should be able to get the output into a string.
We'll see.
LICENSE
Devel::Trace 0.11 and its source code are hereby placed in the public domain.
Author
Mark-Jason Dominus (C<mjd-perl-trace@plover.com>), Plover Systems co. See the C<Devel::Trace.pm> Page at
http://www.plover.com/~mjd/perl/Trace for news and upgrades.
perl v5.14.2 2012-02-16 Trace(3pm)