Új hozzászólás Aktív témák

• #33 Jester01 veterán stargazer #32

  Új Válasz 2006-03-24 19:00:52 #33

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Jester01

  veterán

  válasz stargazer #32 üzenetére

  BEGIN { FS=''[AB]''; }
  {
  delete newwords;
  swap=0;
  for(i=2; i<=NF; i++)
  {
  newwords[$i]=1;
  if ($i in prevwords) { $i=''csereszo''; swap=1; }
  }
  delete prevwords;
  for(w in newwords) { prevwords[w]=1; }
  if (swap)
  {
  print $2 ''B'' $3;
  } else {
  print;
  }
  }
  
  
  A linken is frissítettem. Ez most kitörli a sor elejéról az A-t ha csere van, de a B marad. Azok a sorok amelyekben nem vol csere változatlan formában kerülnek kiírásra.

Új hozzászólás Aktív témák