Szkriptek: Python, Perl, Bash, ...

Mintaillesztés: ', * stb. tartalmű szövegeknél

Sziasztok!

Egy Perl szkriptben vannak bizonyos bejegyzések egy tömbben, amik tartalmazhatnak ', <, |, * stb., a mintaillesztés során is használatos karaktereket.
Egy kettős foreach ciklusban vizsgálom a sorokat, aminek a lényege, hogy a $sorok változó veszi fel a külső ciklus értékét, a belső ciklus pedig a $nevek értéket veszi fel.
Csak, hogy ne kelljen a $sorok változó tartalmából elkülöníteni az előtte és után található szövegeket, egyszerűen rá próbálom illeszteni a $nevek változóra. Kb.: legyen a $sorok aktuális értéke bla-bla-bla 123 Jóska* bla-bla, a $nevek pedig felveheti a Jóska* értéket, így úgy gondoltam, hogy ráeresztem ezt a mezei vizsgálatot


if ($sorok =~ /$nevek/) {...

Ám nem értékeli ki: ez történik, ha aposztróf, vagy csillag, törtjel, felkiáltójel stb. van a $nevek változóban.

Lehet-e hidegen hagyatni a Perllel azokat a karaktereket, ami egyébként beavatkoznának a mintaillesztésbe?

A válaszokat előre is köszönöm.

XML adatsor küldése URL-re TCL-ben

Sziasztok!

Adott egy RESTfull webservice egy webshophoz, melyet a http://www.../service.php címen érek el.
Lekérdezéshez a kliens egy GET kéréssel fordul a szerverhez, mely lekérés tartalmaz egy XML adatot. Ebben kell megadni a lekérdezés adatait és az azonosítási tételeket is. Az eredményét a szerver egy XML adathalmazban küldi vissza. Létrehozás/Módosítás esetén POST, Törlés esetén DELETE hívást kel küldeni és a megfelelő XML-t.

Nézem, nézem a kiguglizott TCL leírásokat de kínai még. :( Hogy örülnék egy konkrétan működő szkriptnek! :)

Valami olyannak, ami leírja, hogy a "www.minta.com/oldal.php" címre hogyan jut el mondjuk a POST parancs és a minta.XML fájl, vagy a sztringbe ágyazott XML tartalom.

A TCL-ben technikai kényszer miatt gondolkodom. Nevezetesen, hogy a szkript végül egy PostgreSQL szerveren fog szaladgálni, ahol más feladatok megoldására már konfigurálva lett a TCL (pltclu). Csak sajna még nagyon kezdő vagyok benne.

Előre is köszi a segítséget!
Szuni

synology házi szerver

sziasztok,

Az alábbi NAS-on szeretnék egy bash scriptet futtatni:
http://synology.hu/?oldal=termek_ds112j

A problémám az hogy a következő sorra hibát kapok:
YESTERDAY=$(date -d "yesterday" +"%Y%m%d")

A "yesterday" és a "1 days ago" sem működik.

Ez a sor ubuntu alatt hibátlanul lefut. Van valakinek ötlete, milyen módon hivatkozhatnék a tegnapi napra ezen a masinán?

C++ dll-bol char** Python-ba

Udv,

Van egy C++-ban irt .dll aminek a fuggvenyeit Python-bol kellene meghivnom. Hogyan tudnam Python-bol hasznalni a kovetkezo szignaturaju fuggvenyt?:

int func (char **);

Az alabbi mukodik, de itt ugye csak char * es nem char ** van:

GetDeviceName = Debug.GetDeviceName
Debug_GetDeviceName.restype = c_int
Debug_GetDeviceName.argtypes = [c_char_p]

status = SiDebug_GetDeviceName(name)

Koszi,

/sza2

[megoldva - saját szakállra] Ftp feltöltés után ellenőrzés

Kedves fórumozók!

Bash problémával kapcsolatban kérném segítségeteket.
Adott egy ftp szerver, amire fájlokat kell ütemezve (crontab) feltölteni. A feltöltés sikerességét kellene ellenőrizni egy másik scriptből úgy, hogy a helyi archive mappa tartalmát kellene összehasonlítani a távoli gép ment könyvtárával. A listát le tudom kérni, csak ott akadtam el, hogy az ftp kimenetét hogyan tudnám egy tömbben letárolni, hogy azzal dolgozni is tudjak. Elvileg elég a fájlnév+méret egyezőséget ellenőrizni, amit cut-al simán le tudok válogatni, ha meg van a tömbösítés. Az ellenőrzéssel se lesz gondom, csak a kimenetet kéne valahogy elkapni.
echo -e $FTP_COMMAND | ftp -n /IDE KÉNE AZ ELKAPÁS/
Az FTP_COMMAND értelem szerűen előtte soronként fel van építve és működik.
A gondom az, hogy sehogy nem tudom a kimenetet megfogni, mert azt a local mailboxban kapom csak meg :s
A segítséget előre is köszi.

perl - regex - több egymásutáni szóköz kitölrése szövegben, kivéve ha az zárójelben van

Sziasztok,
a problémám, hogy normalizálni szeretnék egy szövegfájlt, a sok felesleges szóközt ki törölni. Ahol több a szóköz mint egy, ott egy üres szóköz legyen. A szövegfájlban viszont vannak olyan szövegek, amik zárójelbe vannak, azon belül nem szabad normalizálnom.

Az eredeti szövegre példa:


field analysis_version           datatype packed_decimal      default  '         1'

ezzel:


$line =~ s/\s+/ /g;

a következőt kapom:


field analysis_version datatype packed_decimal default  ' 1'

Amit viszont én szeretnék, az ez lenne:


field analysis_version datatype packed_decimal default '         1'

Már egy fél napot elidőztem vele, de eddig kollegák közül se tudott senki segíteni.

Valaki tudja a megoldást? Köszönöm a segítséget előre is.

Szerk: bár nem jelzi a példa, de az idézöjel utáni szövegnek is normalizálódni kellene, ha van mögötte.
Köszi/bocsi

egysoros fajlba iranyitas

A gugli segitsegevel sikerult osszetakolnom egy kezdetleges szkriptet, ami konzolra kiirja az eloado nevet es a dal cimet:

mplayer http://icecast.bigrradio.com/80smetalfm.pls | while read line; do echo $line | grep -e "StreamTitle=" | awk -F "'" '{print $2}'; done

Ennek a kimenetet szeretnem egy olyan fajlba iranyitani, ami csak egy darab sorbol all es ez mindig felulirodik, sajnos nem jovok ra hogyan kell ezt csinalnom. Ezert kernem a ti segitsegeteket.

Ugy kepzeltem el, hogy ennek a fajlnak a tartalmat fogom majd megjeleniteni a conky-ban.

perl - test- and- set

Hello!

Valami test- and- set tipusu megoldast keresek perlhez (nem szalak, hanem processzek kozott). Tehat valami olyasmit, ami oszthatatlanul biztositja, hogy egy "szemaforszeru" dolgon a program csak egyedul tud tuljutni, mas folyamat csak akkor, ha O mar "tilosra" allitotta a szemafort.

Ha valami perlbol meghivhato dologrol tudtok, ami konnyen hasznalhato, az is jo lenne.

Koszi.