comparison TL1/toasm.pl @ 117:f8f44153f8c1

add TL1 source
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Fri, 04 Jan 2019 07:39:19 +0900
parents
children 8f2154d95a04
comparison
equal deleted inserted replaced
116:6be44b5de445 117:f8f44153f8c1
1 #!/usr/bin/perl
2
3 while(<>) {
4 s/\r\n$//;
5 s/^\d+ //;
6 print $_,"\n"
7 }