Thread View: pl.comp.lang.perl
14 messages
14 total messages
Started by PAweł
Wed, 24 Feb 2010 17:19
Wiem że to nie Perl, ale może ktoś ma pomysł? (bash + sed)
Author: PAweł
Date: Wed, 24 Feb 2010 17:19
Date: Wed, 24 Feb 2010 17:19
56 lines
2594 bytes
2594 bytes
Witam,
Wiem, że pytanie nie dotyczy Perla, ale być może ktoś będzie miał jakiś
pomysł. Uczę się dopiero pisać w shellu, więc proszę o wyrozumiałość. Żeby
napisać to w perlu jestem za cienki. Byłbym wdzięczny za jakieś wskazówki.
Chodzi o to, że mam sobie plik costam.xml, który chce lekko przerobić (mam do
dyspozycji basha, seda, awka, perla). W tym pliku mam kilkaset tagów:
<nr_zlecenia>AP-001</nr_zlecenia>. Występują w różnych sekcjach, ale nazwa
taga i zawartość są zawsze takie same. Chciałbym teraz wyszukać wszystkie
wystąpienia tego AP-001 w ramach tego taga, 3 ostatnie znaki potraktować jako
liczby i iterować je tak, żeby w wszystkie wartości tego taga w pliku były
unikalne, czyli:
<nr_zlecenia>AP-001</nr_zlecenia>
<nr_zlecenia>AP-002</nr_zlecenia>
<nr_zlecenia>AP-003</nr_zlecenia>
Zrobiłem więc coś takiego:
----
#!/bin/bash
VAR=0
find . -name "*.xml" -print | while read nazwa;
do
VAR=$(( $VAR + 1 ))
s=$(printf "%.3d" $VAR)
sed -i -e
's!<nr_zlecenia>\(.\{4\}\)...</nr_zlecenia>!<nr_zlecenia>\1'"$s"'</nr_zlecenia>!'
$nazwa
done
----
No i 3 ostatnie znaki zawartości taga zamienia mi... ale jedną wartość. Czyli
jak miałem wcześniej 300 razy w pliku <nr_zlecenia>AP-001</nr_zlecenia> to
teraz mam tyle samo razy <nr_zlecenia>AP-002</nr_zlecenia>. Ja tymczasem
chciałem żeby każde kolejne wystąpienie zwiększał o 1. W sumie przecież
iteracja VAR oraz przypisywanie do $s odbywa się we wnętrzu pętli. Czy ma ktoś
z Was pomysł jak można to uzyskać? Próbowałem zmieniać typ pętli na for, ale
nic to nie daje.
Dzięki i pozdrawiam,
Paweł
--
Wysłano z serwisu Usenet w portalu Gazeta.pl -> http://www.gazeta.pl/usenet/
Re: Wiem że to nie Perl, ale może ktoś ma pomysł? (bash + sed)
Author: PAweł
Date: Wed, 24 Feb 2010 17:23
Date: Wed, 24 Feb 2010 17:23
10 lines
1130 bytes
1130 bytes
Przepraszam za małą pomyłkę. W pliku zawartosc tagów to nie AP-001, tylko APP-001 (w sumie 7 znaków, z czego chciałbym zwiększać o 1 trzy ostatnie) Pozdrawiam, Paweł -- Wysłano z serwisu Usenet w portalu Gazeta.pl -> http://www.gazeta.pl/usenet/
Re: Wiem że to nie Perl, ale może ktoś ma pomysł? (bash + sed)
Author: Szymon Sokół
Date: Wed, 24 Feb 2010 18:31
Date: Wed, 24 Feb 2010 18:31
18 lines
2132 bytes
2132 bytes
On Wed, 24 Feb 2010 17:19:58 +0000 (UTC), PAweł wrote:
> Wiem, że pytanie nie dotyczy Perla, ale być może ktoś będzie miał jakiś
> pomysł. Uczę się dopiero pisać w shellu, więc proszę o wyrozumiałość. Żeby
> napisać to w perlu jestem za cienki. Byłbym wdzięczny za jakieś wskazówki.
A mnie z kolei nawet się nie chce kombinować, jak to zrobić bez Perla - po
pierwsze, to byłoby NTG, po drugie, w Perlu jest *łatwiej*. Jeśli dobrze
zrozumiałem (tj. jeśli dobrze opisałeś...) problem, to poniższa komenda
załatwi sprawę:
perl -pie 's{<nr_zlecenia>APP-001</nr_zlecenia>}{sprintf"<nr_zlecenia>APP-%03d</nr_zlecenia>",++$i}ge' costam.xml
--
Szymon Sokół (SS316-RIPE) -- Network Manager B
Computer Center, AGH - University of Science and Technology, Cracow, Poland O
http://home.agh.edu.pl/szymon/ PGP key id: RSA: 0x2ABE016B, DSS: 0xF9289982 F
Free speech includes the right not to listen, if not interested -- Heinlein H
Re: Wiem że to nie Perl, ale może ktoś ma pomysł? (bash + sed)
Author: Paweł
Date: Wed, 24 Feb 2010 19:15
Date: Wed, 24 Feb 2010 19:15
28 lines
1876 bytes
1876 bytes
Szymon Sokół <szymon@bastard.operator.from.hell.pl> napisał(a):
> perl -pie 's{<nr_zlecenia>APP-001</nr_zlecenia>}{sprintf"<nr_zlecenia>APP-%03d<
> /nr_zlecenia>",++$i}ge' costam.xml
>
Wielkie dzieki. Cos czulem ze przekombinowalem z tym sedem (ja sie w koncu
MUSZE tego Perla nauczyc). Natomiast przy odpaleniu tego co napisales, dostaje:
Can't open perl script
"s{<nr_zlecenia>APP-001</nr_zlecenia>}{sprintf"<nr_zlecenia>APP-%03d</nr_zlecenia>",++$i}ge":
Nie ma takiego pliku ani katalogu
Plik costam.xml jest, perl w wersji 5.10.0. Wszystkie uprawnienia ok. Nie ma
znaczenia czy robie oto z roota. Jak odpalam:
perl -pie
's{<nr_zlecenia>APP-001</nr_zlecenia>}{sprintf"<nr_zlecenia>APP-%03d</nr_zlecenia>",++$i}ge'
costam.xml > nowe_costam.xml
dostaje znowu Can't open perl script.. Masz moze pomysl ki diabel?
Wielkie dzieki z gory..
Pozdrawiam,
PAwel
--
Wysłano z serwisu Usenet w portalu Gazeta.pl -> http://www.gazeta.pl/usenet/
Re: Wiem że to nie Perl, ale może ktoś ma pomysł? (bash + sed)
Author: Sławomir Szczyrba
Date: Wed, 24 Feb 2010 19:37
Date: Wed, 24 Feb 2010 19:37
19 lines
1692 bytes
1692 bytes
BOFH excuse 421: Paweł not responding
> perl -pie
> 's{<nr_zlecenia>APP-001</nr_zlecenia>}{sprintf"<nr_zlecenia>APP-%03d</nr_zlecenia>",++$i}ge'
> costam.xml > nowe_costam.xml
>
> dostaje znowu Can't open perl script.. Masz moze pomysl ki diabel?
> Wielkie dzieki z gory..
>
Spróbój przez: perl -pi -e 's...
> PAwel
Sławek
--
________
_/ __/ __/ Cssoś jeszcze ? -- Sid
\__ \__ \_______________________________________________________________
/___/___/ Sławomir Szczyrba steev/AT/hot\dot\pl
Re: Wiem że to nie Perl, ale może ktoś ma pomysł? (bash + sed)
Author: PAweł
Date: Wed, 24 Feb 2010 19:44
Date: Wed, 24 Feb 2010 19:44
12 lines
1298 bytes
1298 bytes
Sławomir Szczyrba <creature@of.the.night> napisał(a): > Spróbój przez: perl -pi -e 's... Poszlo! Panowie, jestescie BOGAMI. A ja posypuje glowe popiolem i zamiast cudowac z sedem na sile, biore sie za nauke perla. Pozdrawiam Pawel -- Wysłano z serwisu Usenet w portalu Gazeta.pl -> http://www.gazeta.pl/usenet/
Re: Wiem że to nie Perl, ale może ktoś ma pomysł? (bash + sed)
Author: Sławomir Szczyrba
Date: Wed, 24 Feb 2010 20:03
Date: Wed, 24 Feb 2010 20:03
16 lines
1793 bytes
1793 bytes
Hej, PAweł, widziałeś dokąd poszli ludzie ? >> Spróbój przez: perl -pi -e 's... > > Poszlo! Panowie, jestescie BOGAMI. A ja posypuje glowe popiolem i zamiast > Jak widać niezupełnie bogami. Załatw mi trochę popiołu z półki 'Dla robiących szczególnie rażące orty'. Tak z tona powinna wystarczyć :/ Sławek -- ________ _/ __/ __/ Aleście wykołowali te baby... (Seksmisja) \__ \__ \_______________________________________________________________ /___/___/ Sławomir Szczyrba steev/AT/hot\dot\pl
Re: Wiem że to nie Perl, ale może ktoś ma pomysł? (bash + sed)
Author: Maciej Misiak
Date: Wed, 24 Feb 2010 21:14
Date: Wed, 24 Feb 2010 21:14
19 lines
1854 bytes
1854 bytes
Sławomir Szczyrba pisze: > Hej, PAweł, widziałeś dokąd poszli ludzie ? > >>> Spróbój przez: perl -pi -e 's... >> Poszlo! Panowie, jestescie BOGAMI. A ja posypuje glowe popiolem i zamiast >> > Jak widać niezupełnie bogami. > Załatw mi trochę popiołu z półki 'Dla robiących szczególnie rażące orty'. > Tak z tona powinna wystarczyć :/ > > Sławek To nie kurde fair. Albo nikt nic przez pół miesiąca, albo ktoś pisze z jakimiś trudnymi problemami z rzadkimi pakietami, co to nie mam o nich pojęcia, a jak już się coś fajnego pojawi, to akurat mnie przez wieczór nie ma przy kompie i jak się pojawię to już wszystko rozwiązane... :/ -- grizzley
Re: Wiem że to nie Perl, ale może ktoś ma pomysł? (bash + sed)
Author: Stachu 'Dozzie' K.
Date: Wed, 24 Feb 2010 21:28
Date: Wed, 24 Feb 2010 21:28
29 lines
2512 bytes
2512 bytes
On 2010-02-24, Maciej Misiak <grizzley@poczta.onet.pl> wrote: > Sławomir Szczyrba pisze: >> Hej, PAweł, widziałeś dokąd poszli ludzie ? >> >>>> Spróbój przez: perl -pi -e 's... >>> Poszlo! Panowie, jestescie BOGAMI. A ja posypuje glowe popiolem i zamiast >>> >> Jak widać niezupełnie bogami. >> Załatw mi trochę popiołu z półki 'Dla robiących szczególnie rażące orty'. >> Tak z tona powinna wystarczyć :/ >> >> Sławek > > To nie kurde fair. Albo nikt nic przez pół miesiąca, albo ktoś pisze z > jakimiś trudnymi problemami z rzadkimi pakietami, co to nie mam o nich > pojęcia, a jak już się coś fajnego pojawi, to akurat mnie przez wieczór > nie ma przy kompie i jak się pojawię to już wszystko rozwiązane... :/ Tak? To powiedz mi jak pożenić ładnie Proc::Daemon z Proc::PID::File :] Albo jak w jakiś wygodny sposób zdemonizować skrypt, żeby * był zapisany pidfile * nie trzeba było podawać gniazda słuchającego (-> Net::Daemon) * nie trzeba było nic dokompilowywać pod Debianem 5.0 (Lenny) :) -- Secunia non olet. Stanislaw Klekot
Re: Wiem że to nie Perl, ale może ktoś ma pomysł? (bash + sed)
Author: Krzysztof Krzyżaniak
Date: Thu, 25 Feb 2010 14:54
Date: Thu, 25 Feb 2010 14:54
17 lines
1747 bytes
1747 bytes
"Stachu 'Dozzie' K." <dozzie@go.eat.some.screws.spammer.invalid> writes:
[..]
> Tak? To powiedz mi jak pożenić ładnie Proc::Daemon z Proc::PID::File :]
> Albo jak w jakiś wygodny sposób zdemonizować skrypt, żeby
> * był zapisany pidfile
> * nie trzeba było podawać gniazda słuchającego (-> Net::Daemon)
> * nie trzeba było nic dokompilowywać pod Debianem 5.0 (Lenny)
Working::Daemon?
eloy
--
-------e-l-o-y----------------------------e-l-o-y-@-k-o-f-e-i-n-a-.-n-e-t------
jak to dobrze, że są oceany - bez nich byłoby jeszcze smutniej
Re: Wiem że to nie Perl, ale może ktoś ma pomysł? (bash + sed)
Author: Stachu 'Dozzie' K.
Date: Thu, 25 Feb 2010 15:28
Date: Thu, 25 Feb 2010 15:28
31 lines
2794 bytes
2794 bytes
On 2010-02-25, Krzysztof Krzyżaniak <eloy@kofeina.net> wrote:
> "Stachu 'Dozzie' K." <dozzie@go.eat.some.screws.spammer.invalid> writes:
>
>
> [..]
>> Tak? To powiedz mi jak pożenić ładnie Proc::Daemon z Proc::PID::File :]
>> Albo jak w jakiś wygodny sposób zdemonizować skrypt, żeby
>> * był zapisany pidfile
>> * nie trzeba było podawać gniazda słuchającego (-> Net::Daemon)
>> * nie trzeba było nic dokompilowywać pod Debianem 5.0 (Lenny)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
>
> Working::Daemon?
Niespecjalnie chce mi się to debianizować ;) Inaczej po prostu bym coś
wziął z CPAN-u.
#v+
[klekosta@uw000419 klekosta]$ apt-cache show libworking-daemon-perl
W: Nie udało się odnaleźć pakietu libworking-daemon-perl
E: Nie znaleziono żadnych pakietów
[klekosta@uw000419 klekosta]$ apt-cache search working::daemon
[klekosta@uw000419 klekosta]$ apt-cache search net::daemon
libnet-daemon-perl - Perl module for building portable Perl daemons easily.
libnet-ldap-server-perl - LDAP server-side protocol handling in Perl
libnet-server-perl - An extensible, general perl server engine
[klekosta@uw000419 klekosta]$
#v-
--
Secunia non olet.
Stanislaw Klekot
Re: Wiem że to nie Perl, ale może ktoś ma pomysł? (bash + sed)
Author: Krzysztof Krzyżaniak
Date: Thu, 25 Feb 2010 16:44
Date: Thu, 25 Feb 2010 16:44
168 lines
6720 bytes
6720 bytes
"Stachu 'Dozzie' K." <dozzie@go.eat.some.screws.spammer.invalid> writes:
> On 2010-02-25, Krzysztof Krzyżaniak <eloy@kofeina.net> wrote:
>> "Stachu 'Dozzie' K." <dozzie@go.eat.some.screws.spammer.invalid> writes:
>>
>>
>> [..]
>>> Tak? To powiedz mi jak pożenić ładnie Proc::Daemon z Proc::PID::File :]
>>> Albo jak w jakiś wygodny sposób zdemonizować skrypt, żeby
>>> * był zapisany pidfile
>>> * nie trzeba było podawać gniazda słuchającego (-> Net::Daemon)
>>> * nie trzeba było nic dokompilowywać pod Debianem 5.0 (Lenny)
> ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
>>
>> Working::Daemon?
>
> Niespecjalnie chce mi się to debianizować ;) Inaczej po prostu bym coś
> wziął z CPAN-u.
15 sekund roboty :>
dh-make-perl --build --cpan Working::Daemon
eloy@jumon:/tmp$ dh-make-perl --build --cpan Working::Daemon
Dispatching deprecated method 'CPAN::Config::load' to CPAN::HandleConfig
CPAN: File::HomeDir loaded ok (v0.86)
Going to read '/home/eloy/.cpan/Metadata'
Database was generated on Tue, 23 Feb 2010 03:09:24 GMT
CPAN: Digest::SHA loaded ok (v5.48)
Checksum for
/home/eloy/.cpan/source/authors/id/A/AB/ABERGMAN/Working-Daemon-0.31.tar.gz
ok
CPAN: Archive::Tar loaded ok (v1.52)
Working-Daemon-0.31/
Working-Daemon-0.31/bin/
Working-Daemon-0.31/bin/test-syslog.pl
Working-Daemon-0.31/bin/test.pl
Working-Daemon-0.31/Changes
Working-Daemon-0.31/lib/
Working-Daemon-0.31/lib/Working/
Working-Daemon-0.31/lib/Working/Daemon/
Working-Daemon-0.31/lib/Working/Daemon/Syslog.pm
Working-Daemon-0.31/lib/Working/Daemon.pm
Working-Daemon-0.31/Makefile.PL
Working-Daemon-0.31/MANIFEST
Working-Daemon-0.31/META.yml
Working-Daemon-0.31/README
Working-Daemon-0.31/t/
Working-Daemon-0.31/t/background-foreground.t
Working-Daemon-0.31/t/Working-Daemon.t
CPAN: File::Temp loaded ok (v0.22)
Found: Working-Daemon 0.31 (libworking-daemon-perl arch=all)
Using cached Contents from Thu Feb 25 15:17:44 2010
Using maintainer: Krzysztof Krzyżaniak (eloy) <eloy@debian.org>
Found docs: README
Using rules: /usr/share/dh-make-perl/rules.dh7.tiny
**********
Copyright information incomplete!
Upstream copyright information could not be automatically determined.
If you are building this package for your personal use, you might
disregard
this information; however, if you intend to upload this package to
Debian
(or in general, if you plan on distributing it), you must look into the
complete copyright information.
The causes for this warning are:
Licensing information is present, but cannot be parsed
make: Wejście do katalogu `/tmp/Working-Daemon-0.31'
dh clean
dh_testdir
dh_auto_clean
dh_clean
make: Opuszczenie katalogu `/tmp/Working-Daemon-0.31'
make: Wejście do katalogu `/tmp/Working-Daemon-0.31'
dh build
dh_testdir
dh_auto_configure
Checking if your kit is complete...
Looks good
'CREATE_PACKLIST' is not a known MakeMaker parameter name.
Writing Makefile for Working::Daemon
dh_auto_build
make[1]: Wejście do katalogu `/tmp/Working-Daemon-0.31'
cp lib/Working/Daemon.pm blib/lib/Working/Daemon.pm
cp lib/Working/Daemon/Syslog.pm blib/lib/Working/Daemon/Syslog.pm
Manifying blib/man3/Working::Daemon.3pm
make[1]: Opuszczenie katalogu `/tmp/Working-Daemon-0.31'
dh_auto_test
make[1]: Wejście do katalogu `/tmp/Working-Daemon-0.31'
PERL_DL_NONLAZY=1 /usr/bin/perl "-MExtUtils::Command::MM" "-e"
"test_harness(0, 'blib/lib', 'blib/arch')" t/*.t
t/background-foreground.t .. ok
t/Working-Daemon.t ......... ok
All tests successful.
Files=2, Tests=10, 1 wallclock secs ( 0.06 usr 0.00 sys + 0.15 cusr
0.02 csys = 0.23 CPU)
Result: PASS
make[1]: Opuszczenie katalogu `/tmp/Working-Daemon-0.31'
make: Opuszczenie katalogu `/tmp/Working-Daemon-0.31'
make: Wejście do katalogu `/tmp/Working-Daemon-0.31'
dh binary
dh_testroot
dh_prep
dh_installdirs
dh_auto_install
make[1]: Wejście do katalogu `/tmp/Working-Daemon-0.31'
Installing
/tmp/Working-Daemon-0.31/debian/libworking-daemon-perl/usr/share/perl5/Working/Daemon.pm
Installing
/tmp/Working-Daemon-0.31/debian/libworking-daemon-perl/usr/share/perl5/Working/Daemon/Syslog.pm
Installing
/tmp/Working-Daemon-0.31/debian/libworking-daemon-perl/usr/share/man/man3/Working::Daemon.3pm
make[1]: Opuszczenie katalogu `/tmp/Working-Daemon-0.31'
dh_install
dh_installdocs
dh_installchangelogs
dh_installexamples
dh_installman
dh_installcatalogs
dh_installcron
dh_installdebconf
dh_installemacsen
dh_installifupdown
dh_installinfo
dh_pysupport
dh_installinit
dh_installmenu
dh_installmime
dh_installmodules
dh_installlogcheck
dh_installlogrotate
dh_installpam
dh_installppp
dh_installudev
dh_installwm
dh_installxfonts
dh_bugfiles
dh_lintian
dh_gconf
dh_icons
dh_perl
dh_usrlocal
dh_link
dh_compress
dh_fixperms
dh_strip
dh_makeshlibs
dh_shlibdeps
dh_installdeb
dh_gencontrol
dh_md5sums
dh_builddeb
dpkg-deb: budowanie pakietu "libworking-daemon-perl" w
"../libworking-daemon-perl_0.31-1_all.deb".
make: Opuszczenie katalogu `/tmp/Working-Daemon-0.31'
--- Done
... a zresztą i tak to miałem wrzucić do debiana bo używamy.
eloy
--
-------e-l-o-y----------------------------e-l-o-y-@-k-o-f-e-i-n-a-.-n-e-t------
jak to dobrze, że są oceany - bez nich byłoby jeszcze smutniej
Re: Wiem że to nie Perl, ale może ktoś ma pomysł? (bash + sed)
Author: Maciej Misiak
Date: Thu, 25 Feb 2010 16:46
Date: Thu, 25 Feb 2010 16:46
35 lines
2713 bytes
2713 bytes
Stachu 'Dozzie' K. pisze: > On 2010-02-24, Maciej Misiak <grizzley@poczta.onet.pl> wrote: >> Sławomir Szczyrba pisze: >>> Hej, PAweł, widziałeś dokąd poszli ludzie ? >>> >>>>> Spróbój przez: perl -pi -e 's... >>>> Poszlo! Panowie, jestescie BOGAMI. A ja posypuje glowe popiolem i zamiast >>>> >>> Jak widać niezupełnie bogami. >>> Załatw mi trochę popiołu z półki 'Dla robiących szczególnie rażące orty'. >>> Tak z tona powinna wystarczyć :/ >>> >>> Sławek >> To nie kurde fair. Albo nikt nic przez pół miesiąca, albo ktoś pisze z >> jakimiś trudnymi problemami z rzadkimi pakietami, co to nie mam o nich >> pojęcia, a jak już się coś fajnego pojawi, to akurat mnie przez wieczór >> nie ma przy kompie i jak się pojawię to już wszystko rozwiązane... :/ > > Tak? To powiedz mi jak pożenić ładnie Proc::Daemon z Proc::PID::File :] > Albo jak w jakiś wygodny sposób zdemonizować skrypt, żeby > * był zapisany pidfile > * nie trzeba było podawać gniazda słuchającego (-> Net::Daemon) > * nie trzeba było nic dokompilowywać pod Debianem 5.0 (Lenny) > > :) Oj te pakiety jakieś takie daemoniczne. Musisz zaufać jasnej stronie mocy, np. Expect::Angel. :> Poza tym pisałem, że z modułami to trzeba mieć do czynienia żeby doradzać. Nie masz jakiegoś regexpa na 3 strony do zoptymalizowania albo jakiegoś algorytmu, który tak beznadziejnie napisałeś, że 3 dni szachuje hash hashyshów shyshką? :> -- grizzley
Re: Wiem że to nie Perl, ale może ktoś ma pomysł? (bash + sed)
Author: Maciej Misiak
Date: Thu, 25 Feb 2010 16:50
Date: Thu, 25 Feb 2010 16:50
22 lines
1831 bytes
1831 bytes
Paweł pisze:
> Szymon Sokół <szymon@bastard.operator.from.hell.pl> napisał(a):
>
>> perl -pie 's{<nr_zlecenia>APP-001</nr_zlecenia>}{sprintf"<nr_zlecenia>APP-%03d<
>> /nr_zlecenia>",++$i}ge' costam.xml
>>
>
> Wielkie dzieki. Cos czulem ze przekombinowalem z tym sedem (ja sie w koncu
> MUSZE tego Perla nauczyc). Natomiast przy odpaleniu tego co napisales, dostaje:
>
> Can't open perl script
> "s{<nr_zlecenia>APP-001</nr_zlecenia>}{sprintf"<nr_zlecenia>APP-%03d</nr_zlecenia>",++$i}ge":
> Nie ma takiego pliku ani katalogu
To ja jeszcze może golfiarskim okiem: czy Ty właściwie potrzebujesz do
tego wszystkiego taga zamykającego?
perl -pi -e
's{<nr_zlecenia>APP-001\b}{sprintf"<nr_zlecenia>APP-%03d",++$i}ge'
costam.xml
--
grizzley
Thread Navigation
This is a paginated view of messages in the thread with full content displayed inline.
Messages are displayed in chronological order, with the original post highlighted in green.
Use pagination controls to navigate through all messages in large threads.
Back to All Threads