File: filtuu

package info (click to toggle)
libfilter-perl 1.57-1
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 640 kB
  • ctags: 765
  • sloc: perl: 911; makefile: 15
file content (6 lines) | stat: -rwxr-xr-x 93 bytes parent folder | download | duplicates (12) 
1
2
3
4
5
6
 
#!/usr/bin/perl

print "use Filter::UUdecode ;\n" ;
while (<>) {
    print pack("u", $_) ;
}