Comment puis-je bande multiligne C commentaires à partir d'un fichier à l'aide de Perl?

Quelqu'un peut-il me faire avec l'expression régulière de la bande de commentaire sur plusieurs lignes et commentaires d'une ligne dans un fichier?

par exemple:

                  " WHOLE "/*...*/" HAS TO BE STRIPED OFF....."

1.   /* comment */
2.   /* comment1 */  code   /* comment2 */ #both /*comment1*/and /*comment2*/
                                             #has to striped off and rest should 
                                                 #remain.
3.   /*.........
       .........
       .........
       ......... */

j'ai vraiment apprécier vous si u ce besoin.... merci à l'avance.

En règle générale, j'ai trouvé que quand vous essayez de les manipuler par programmation un langage comme C, XML, SQL, etc. vous devriez vraiment penser à un analyseur de ne pas regexs. Je recommande fortement d'apprentissage sur un analyseur de générateurs, yacc, javacc, etc. Il avait d'énormes profits pour moi en tant que développeur de logiciels.

InformationsquelleAutor User1611 | 2009-05-18

c comments perl

-2

Y compris des tests:
```
use strict;
use warnings;
use Test::More qw(no_plan);
sub strip_comments {
  my $string=shift;
  $string =~ s#/\*.*?\*/##sg; #strip multiline C comments
  return $string;
}
is(strip_comments('a/* comment1 */ code   /* comment2 */b'),'a  code   b');
is(strip_comments('a/* comment1 /* comment2 */b'),'ab');
is(strip_comments("a/* comment1\n\ncomment */code /* comment2 */b"),'a code b');
```
- génial....merci beaucoup
- Gâchera /* ou / apparaissant dans une chaîne de caractères. E. g. la chaîne "Ce / string" ne comprend pas un début de commentaire.
- Ainsi que de ne pas traiter les commentaires des caractères dans les chaînes (ou même de plusieurs caractères constantes de caractères), il n'y a pas de poignée anti-slash-newline épissage qui permet l'ouverture de la barre oblique suivie par une barre oblique inverse, de retour à la ligne et ensuite astérisque, par exemple. Aussi ne gère pas le C++ commentaires (ce qui peut avoir des anti-slash-newline épissage). Et il ne gère pas trigraphs - la seule pertinente est"??/' ce qui signifie barre oblique inverse. Combien cette matière dépend de la façon dont l'épreuve des balles de votre code doit être.
- C'est la mauvaise réponse. Ne pas faire de cette façon.
- mirod la réponse est beaucoup mieux.
- Le remplacement des commentaires avec la chaîne vide est également faux. Il va changer la sémantique du code lorsque les jetons sont épissés accidentellement. La Norme exige que les commentaires soient remplacés par un seul caractère espace dans la traduction de la phase 3.
- Nice. Je vous remercie..
InformationsquelleAutor Alexandr Ciornii
16

De perlfaq6 "Comment puis-je utiliser une expression régulière pour dépouiller les commentaires de style C à partir d'un fichier?":

Tout cela peut être fait, il est beaucoup plus difficile que vous ne le pensez. Par exemple, ce one-liner
```
perl -0777 -pe 's{/\*.*?\*/}{}gs' foo.c
```
permettra de travailler dans de nombreux cas mais pas tous. Vous voyez, c'est trop simple d'esprit pour certains types de programmes en C, en particulier, ceux avec ce qui semble être des commentaires dans les chaînes entre guillemets. Pour cela, vous auriez besoin de quelque chose de ce genre, créé par Jeffrey Friedl et modifié plus tard par Fred Curtis.
```
$/ = undef;
$_ = <>;
s#/\*[^*]*\*+([^/*][^*]*\*+)*/|("(\\.|[^"\\])*"|'(\\.|[^'\\])*'|.[^/"'\\]*)#defined $2 ? $2 : ""#gse;
print;
```
Cela pourrait, bien sûr, être plus lisiblement écrit avec le /x modificateur, l'ajout d'espaces et commentaires. Ici, il est élargi, avec l'aimable autorisation de Fred Curtis.
```
s{
   /\*         ##  Start of /* ... */ comment
   [^*]*\*+    ##  Non-* followed by 1-or-more *'s
   (
     [^/*][^*]*\*+
   )*          ##  0-or-more things which don't start with /
               ##    but do end with '*'
   /          ##  End of /* ... */ comment

 |         ##     OR  various things which aren't comments:

   (
     "           ##  Start of " ... " string
     (
       \\.           ##  Escaped char
     |               ##    OR
       [^"\\]        ##  Non "\
     )*
     "           ##  End of " ... " string

   |         ##     OR

     '           ##  Start of ' ... ' string
     (
       \\.           ##  Escaped char
     |               ##    OR
       [^'\\]        ##  Non '\
     )*
     '           ##  End of ' ... ' string

   |         ##     OR

     .           ##  Anything other char
     [^/"'\\]*   ##  Chars which doesn't start a comment, string or escape
   )
 }{defined $2 ? $2 : ""}gxse;
```
Une légère modification supprime également C++ commentaires, éventuellement sur plusieurs lignes à l'aide d'un caractère de continuation:
```
 s#/\*[^*]*\*+([^/*][^*]*\*+)*/|//([^\\]|[^\n][\n]?)*?\n|("(\\.|[^"\\])*"|'(\\.|[^'\\])*'|.[^/"'\\]*)#defined $3 ? $3 : ""#gse;
```
- brian, cette fonctionnalité pourrait presque être ajouté à perl, il semble être demandé tant. au moins de l'OMI.
- ...et c'est pourquoi nous avons des outils comme yacc, flex, bison, ANTLR, etc. C'est quelque chose que vous avez besoin d'un véritable analyseur pour pas une regex.
- Cette fonctionnalité est déjà en Perl. Perl est un langage de programmation généraliste. Nous ne voulons pas ajouter des fonctionnalités intégrées pour chaque tâche qui vient le long. C'est le travail de modules.
InformationsquelleAutor brian d foy
11

Comme souvent en Perl, vous pouvez atteindre le CPAN: Regexp::Common::Commentaires devrait vous aider. La seule langue que j'ai trouvé qui utilise les commentaires que vous avez décrit, c'est Nickel, mais peut-être que PHP commentaires serait OK (//pouvez également démarrer un commentaire sur une seule ligne).

Noter que dans tous les cas, en utilisant les expressions régulières pour extraire commentaire est dangereux, un analyseur syntaxique pour le langage est beaucoup moins risqué. Une regexp-analyseur, par exemple, est susceptible de se confondre par quelque chose comme print "/*";.

InformationsquelleAutor mirod
6

C'est une FAQ:
```
perldoc -q comment
```
Trouvé dans perlfaq6:

Comment puis-je utiliser une expression régulière pour dépouiller les commentaires de style C à partir d'un fichier?

Tout cela peut être fait, il est beaucoup plus difficile que vous ne le pensez. Pour
exemple, ce one-liner ...
- Vous pouvez faire un lien vers perlfaqs faq.perl.org (toujours la dernière version), ou perldoc.perl.org. De cette façon, ces sites obtenir de bons jus de google pour les gens qui recherche des réponses. 🙂
InformationsquelleAutor Sinan Ünür
1

Il est également un non-perl réponse: utiliser le programme stripcmt:

StripCmt est un simple utilitaire écrit
dans C à supprimer les commentaires de C, C++,
et les fichiers source Java. Dans le grand
la tradition de l'Unix de traitement de texte
les programmes, il peut fonctionner soit comme un
FIFO (First In - First Out) ou de filtre
accepter des arguments sur la ligne de commande.

InformationsquelleAutor hlovdal
0

Supprimer /* */commentaires (y compris les multi-ligne)
```
s/\/\*.*?\*\///gs
```
Je poste ce parce qu'il est simple, mais je crois qu'il va trébucher sur des commentaires comme
```
/* sdafsdfsdf /*sda asd*/ asdsdf */
```
Mais comme ils sont assez rares, je préfère le simple regex.
- génial... fonctionne très bien... merci beaucoup..
- super..merci u...
- Lire ma réponse pour voir pourquoi c'est mauvais.
- Et c'est le mauvais exemple, parce que les commentaires ne font pas de nid.
InformationsquelleAutor gacrux

Vous devez vous connecter pour publier un commentaire.