Linux v69820.1blu.de 4.15.0 #1 SMP Mon Sep 30 15:36:27 MSK 2024 x86_64
Apache/2.4.58
Server IP : 195.90.215.149 & Your IP : 216.73.216.250
Domains :
Cant Read [ /etc/named.conf ]
User : www-data
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
/
usr /
share /
doc /
mawk /
examples /
Delete
Unzip
Name
Size
Permission
Date
Action
ct_length.awk
472
B
-rwxr-xr-x
2020-09-19 14:49
decl.awk
3.19
KB
-rwxr-xr-x
2020-09-19 13:46
deps.awk
1.82
KB
-rwxr-xr-x
2023-10-31 22:58
eatc.awk
635
B
-rwxr-xr-x
2020-09-19 11:51
gdecl.awk
2.88
KB
-rwxr-xr-x
2020-09-19 14:04
hcal
13.97
KB
-rwxr-xr-x
2020-09-24 22:05
hical
2.89
KB
-rwxr-xr-x
2009-08-21 00:36
nocomment.awk
654
B
-rwxr-xr-x
2020-09-19 13:02
primes.awk
1.03
KB
-rwxr-xr-x
2008-09-09 20:52
qsort.awk
1.11
KB
-rwxr-xr-x
2020-09-19 14:20
Save
Rename
#!/usr/bin/mawk -f # $MawkId: eatc.awk,v 1.3 2020/09/19 11:51:23 tom Exp $ # eatc.awk # another program to remove comments { while( ( t = index($0 , "/*") ) > 0 ) { if ( t > 1 ) printf "%s" , substr($0,1,t-1) $0 = eat_comment( ( t + 2 <= length($0) ) ? substr($0, t+2) : "" ) } print } function eat_comment(s, t2) { #replace comment by one space printf " " while ( (t2 = index(s, "*/")) == 0 ) if ( getline s == 0 ) { # input error -- unterminated comment system("/bin/sh -c 'echo unterminated comment' 1>&2") exit 1 } return ( t2 + 2 <= length(s) ) ? substr(s,t2+2) : "" }