🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

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)
#51779
Author: PAweł
Date: Wed, 24 Feb 2010 17:19
56 lines
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)
#51780
Author: PAweł
Date: Wed, 24 Feb 2010 17:23
10 lines
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)
#51781
Author: Szymon Sokół
Date: Wed, 24 Feb 2010 18:31
18 lines
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)
#51782
Author: Paweł
Date: Wed, 24 Feb 2010 19:15
28 lines
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)
#51783
Author: Sławomir Szczyrba
Date: Wed, 24 Feb 2010 19:37
19 lines
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)
#51784
Author: PAweł
Date: Wed, 24 Feb 2010 19:44
12 lines
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)
#51786
Author: Sławomir Szczyrba
Date: Wed, 24 Feb 2010 20:03
16 lines
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)
#51787
Author: Maciej Misiak
Date: Wed, 24 Feb 2010 21:14
19 lines
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)
#51788
Author: Stachu 'Dozzie' K.
Date: Wed, 24 Feb 2010 21:28
29 lines
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)
#51789
Author: Krzysztof Krzyżaniak
Date: Thu, 25 Feb 2010 14:54
17 lines
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)
#51790
Author: Stachu 'Dozzie' K.
Date: Thu, 25 Feb 2010 15:28
31 lines
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)
#51791
Author: Krzysztof Krzyżaniak
Date: Thu, 25 Feb 2010 16:44
168 lines
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)
#51792
Author: Maciej Misiak
Date: Thu, 25 Feb 2010 16:46
35 lines
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)
#51793
Author: Maciej Misiak
Date: Thu, 25 Feb 2010 16:50
22 lines
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