source:
JEM-EUSO/esaf_lal/tags/v1_r0/esaf/packages/tools/change_rotation.pl
@
117
Last change on this file since 117 was 117, checked in by , 11 years ago | |
---|---|
File size: 156 bytes |
Line | |
---|---|
1 | #!/usr/bin/perl |
2 | |
3 | while(1) { |
4 | $l1=<STDIN>; |
5 | $l2=<STDIN>; |
6 | $l3=<STDIN>; |
7 | $l4=<STDIN>; |
8 | |
9 | exit if !defined($l1); |
10 | print $l1, $l4, $l3, $l2; |
11 | } |
Note: See TracBrowser
for help on using the repository browser.