403Webshell
Server IP : 15.235.198.142  /  Your IP : 216.73.216.201
Web Server : Apache/2.4.58 (Ubuntu)
System : Linux ballsack 6.8.0-45-generic #45-Ubuntu SMP PREEMPT_DYNAMIC Fri Aug 30 12:02:04 UTC 2024 x86_64
User : www-data ( 33)
PHP Version : 8.3.6
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : OFF  |  Sudo : ON  |  Pkexec : OFF
Directory :  /usr/share/doc/mawk/examples/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :


[ Back ]     

Current File : /usr/share/doc/mawk/examples/nocomment.awk
#!/usr/bin/mawk -f
# $MawkId: nocomment.awk,v 1.3 2020/09/19 13:02:14 tom Exp $

# remove C comments  from a list of files
# using a comment as the record separator
#
# this is trickier than I first thought
# The first version in .97-.9993 was wrong

BEGIN {
 # RS is set to  a comment (this is mildly tricky, I blew it here
 RS = "/[*]([^*]|[*]+[^*/])*[*]+/"
 ORS = " "
 getline hold
 filename = FILENAME
}

# if changing files
filename != FILENAME {
  filename = FILENAME
  printf "%s" , hold
  hold = $0
  next
}

{ # hold one record because we don't want ORS on the last
  #  record in each file
  print hold
  hold = $0
}

END { printf "%s", hold }

Youez - 2016 - github.com/yon3zu
LinuXploit