4

I am processing a file full of unix time strings. I want to convert them all to human readable.

The file looks like so:

1153335401
1153448586
1153476729
1153494310
1153603662
1153640211

Here is the script:

#! /bin/bash
FILE="test.txt"
cat $FILE | while read line; do
perl -e 'print scalar(gmtime($line)), "\n"'
done

This is not working. The output I get is Thu Jan 1 00:00:00 1970 for every line. I think the line breaks are being picked up and that is why it is not working. Any ideas? I'm using Mac OSX is that makes any difference.

brian d foy
  • 129,424
  • 31
  • 207
  • 592
skymook
  • 3,401
  • 35
  • 39

9 Answers9

9
$ perl -lne 'print scalar gmtime $_' test.txt
Wed Jul 19 18:56:41 2006
Fri Jul 21 02:23:06 2006
Fri Jul 21 10:12:09 2006
Fri Jul 21 15:05:10 2006
Sat Jul 22 21:27:42 2006
Sun Jul 23 07:36:51 2006
Greg Bacon
  • 134,834
  • 32
  • 188
  • 245
  • A few good answers. I had to give it to gbacon though. This one liner worked a treat. Thanks to all for the help. It would have been better if I didn't mix bash and perl. – skymook May 17 '10 at 16:35
  • 1
    golfed: `perl -lpe '$_=gmtime$_' test.txt` – Eric Strom May 18 '10 at 00:18
3

Because $line is in single quotes, it's not being processed by bash, and so $line is treated as an (undefined) Perl variable rather than a bash variable.

You don't need a while read bash loop; Perl can do the looping itself using its -n option.

perl -nE 'say scalar(gmtime($_))' test.txt

(using -E to enable say, which automatically appends a newline)

Josh Kelley
  • 56,064
  • 19
  • 146
  • 246
1

Don't use cat.

#! /bin/bash
file="test.txt"
while read line
do
    date -d @$line
done < "$file"
Dennis Williamson
  • 346,391
  • 90
  • 374
  • 439
1

It's not the line breaks, it's that the $line inside the Perl script is a different variable than the $line in the bash script. You could try:

perl -e "print scalar(gmtime($line)),qq/\\n/"

Note the double-quotes, which allow bash to do variable interpolation.

mob
  • 117,087
  • 18
  • 149
  • 283
0

Not forgetting that localtime() can be used instead of gmtime() in Perl

So, if you're not in Greenwich in Winter, you can use localtime(), e.g.

Perl code:

    my $unixtime = 1417014507;
    my $humantime = localtime($unixtime);
    print "\$humantime = $humantime \n";

output:

    $humantime = Wed Nov 26 15:08:27 2014 
Will
  • 1,509
  • 1
  • 13
  • 16
0

No need for Perl:

awk '{ print strftime("%c", $0) }' somefile.txt
Ignacio Vazquez-Abrams
  • 776,304
  • 153
  • 1,341
  • 1,358
0

The issue is that you haven't assigned anything to the $line variable, so it defaults to a zero-value, which is why you always get Thu Jan 1 00:00:00 1970 as an output.

gbacon's answer is about as slick as it gets in Perl.

Community
  • 1
  • 1
Zaid
  • 36,680
  • 16
  • 86
  • 155
0

GNU date/xargs solution:

  xargs -i  date -d "1970-01-01 00:00:00 {} seconds"  </tmp/timestamps 
Jürgen Hötzel
  • 18,997
  • 3
  • 42
  • 58
0

This simple command will do

 cat time.txt | while read line; do date -ud @$line; done > string.txt