[prev] [thread] [next] [Date index for 2005/01/08]
This is a multi-part message in MIME format.
------_=_NextPart_001_01C4F57B.A8568F92
Content-Type: text/plain;
charset="US-ASCII"
Content-Transfer-Encoding: quoted-printable
Hi!
=20
I just run into a problem with the might_have method.
I have a table 'device' and four sub-tables called 'device_router',
'device_switch', 'device_hub' and finally 'device_other'.
Every record in the 'device' table has one matching record in one of the
sub-tables.
I thought about defining four might_have statements, but the last
overwrites all other 3 with the following warning messages:
=20
Subroutine NAC::Device::snmpread redefined at
/usr/local/share/perl/5.8.4/Class/DBI/Relationship.pm line 62.
Subroutine NAC::Device::chassismodel redefined at
/usr/local/share/perl/5.8.4/Class/DBI/Relationship.pm line 62.
Subroutine NAC::Device::memory redefined at
/usr/local/share/perl/5.8.4/Class/DBI/Relationship.pm line 62.
Subroutine NAC::Device::flashmem redefined at
/usr/local/share/perl/5.8.4/Class/DBI/Relationship.pm line 62.
Subroutine NAC::Device::serialnumber redefined at
/usr/local/share/perl/5.8.4/Class/DBI/Relationship.pm line 62.
Subroutine NAC::Device::snmpport redefined at
/usr/local/share/perl/5.8.4/Class/DBI/Relationship.pm line 62.
Subroutine NAC::Device::ipaddr redefined at
/usr/local/share/perl/5.8.4/Class/DBI/Relationship.pm line 62.
=20
WHY?
=20
This is a snip from my library:
=20
package NAC::Device_Router;
use strict;
use base 'NAC::DBI';
__PACKAGE__->table($dbtools::schemaname . '.device_router');
__PACKAGE__->columns(Primary =3D> qw/fk_device/);
__PACKAGE__->columns(Essential =3D> qw/ipaddr snmpport snmpread
serialnumber memory flashmem chassismodel/);
__PACKAGE__->columns(Others =3D> qw//);
=20
package NAC::Device_Switch;
use strict;
use base 'NAC::DBI';
__PACKAGE__->table($dbtools::schemaname . '.device_switch');
__PACKAGE__->columns(Primary =3D> qw/fk_device/);
__PACKAGE__->columns(Essential =3D> qw/ipaddr snmpport snmpread
serialnumber memory flashmem chassismodel/);
__PACKAGE__->columns(Others =3D> qw//);
=20
package NAC::Device;
use strict;
use base 'NAC::DBI';
__PACKAGE__->table($dbtools::schemaname . '.device');
__PACKAGE__->sequence('seq_device');
__PACKAGE__->columns(Primary =3D> qw/id_device/);
__PACKAGE__->columns(Essential =3D> qw/fk_monitor scan ping name alias
location ping_email/);
__PACKAGE__->columns(Others =3D> qw/fk_device_service_contract
service_contract_id service_contract_startdate/);
=20
__PACKAGE__->has_many(interfaces =3D> 'NAC::Interface');
__PACKAGE__->might_have(device_router =3D> 'NAC::Device_Router' =3D>
qw/ipaddr snmpport snmpread serialnumber memory flashmem chassismodel/);
__PACKAGE__->might_have(device_switch =3D> 'NAC::Device_Switch' =3D>
qw/ipaddr snmpport snmpread serialnumber memory flashmem chassismodel/);
=20
=20
And this my test code:
=20
=20
#!/usr/bin/perl
=20
require 5;
use strict;
use lib "../lib";
=20
use nac_objects_dbi;
=20
# --------------------------------------------------------------------
# main
# --------------------------------------------------------------------
=20
my $id =3D 1508;
#my $id =3D 3032;
=20
my $obj_interface =3D NAC::Interface->retrieve($id) or die 'No such
interface';
print $obj_interface->port . "\n";
print $obj_interface->device->name . "\n";
print $obj_interface->device->device_switch->chassismodel . "\n";
=20
=20
=20
With kind regards
Alexander Hartmaier
=20
T-Systems Austria GesmbH
Rennweg 97-99 1030 Wien
=20
phone: +43 57057-4320
fax: +43 57057-95-4320
mobile: +43 676 8642 4320
mail: alexander.hartmaier@xxxxxxxxx.xx
internet: http://www.t-systems.at <http://www.t-systems.at/>=20
=20
=20
*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*=
"*"*
Hinweis: Dieses E-mail kann vertrauliche und gesch=FCtzte Informationen e=
nthalten.
Sollten Sie nicht der beabsichtigte Empf=E4nger sein, verst=E4ndigen Sie =
bitte den Absender und l=F6schen Sie dieses E-mail dann sofort.
Notice: This e-mail contains information that is confidential and may be =
privileged.
If you are not the intended recipient, please notify the sender and then =
delete this e-mail immediately.
*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*=
"*"*
------_=_NextPart_001_01C4F57B.A8568F92
Content-Type: text/html;
charset="US-ASCII"
Content-Transfer-Encoding: quoted-printable
<html xmlns:v=3D"urn:schemas-microsoft-com:vml" xmlns:o=3D"urn:schemas-mi=
crosoft-com:office:office" xmlns:w=3D"urn:schemas-microsoft-com:office:wo=
rd" xmlns:st1=3D"urn:schemas-microsoft-com:office:smarttags" xmlns=3D"htt=
p://www.w3.org/TR/REC-html40">
<head>
<meta http-equiv=3DContent-Type content=3D"text/html; charset=3Dus-ascii"=
>
<meta name=3DGenerator content=3D"Microsoft Word 11 (filtered medium)">
<title>Briefvorlage</title>
<o:SmartTagType namespaceuri=3D"urn:schemas-microsoft-com:office:smarttag=
s"
name=3D"country-region"/>
<o:SmartTagType namespaceuri=3D"urn:schemas-microsoft-com:office:smarttag=
s"
name=3D"place"/>
<!--[if !mso]>
<style>
st1\:*{behavior:url(#default#ieooui) }
</style>
<![endif]-->
<style>
<!--
/* Font Definitions */
@font-face
{font-family:Wingdings;
panose-1:5 0 0 0 0 0 0 0 0 0;}
@font-face
{font-family:TeleLogo;
panose-1:0 0 0 0 0 0 0 0 0 0;}
@font-face
{font-family:Tele-Antiqua;
panose-1:0 0 0 0 0 0 0 0 0 0;}
@font-face
{font-family:Tele-GroteskNor;
panose-1:0 0 0 0 0 0 0 0 0 0;}
@font-face
{font-family:Tele-GroteskFet;
panose-1:0 0 0 0 0 0 0 0 0 0;}
@font-face
{font-family:Tele-GroteskHal;
panose-1:0 0 0 0 0 0 0 0 0 0;}
@font-face
{font-family:Tele-GroteskUlt;
panose-1:0 0 0 0 0 0 0 0 0 0;}
@font-face
{font-family:Tahoma;
panose-1:2 11 6 4 3 5 4 4 2 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:7.1pt;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
h1
{margin-top:18.0pt;
margin-right:0cm;
margin-bottom:12.0pt;
margin-left:41.1pt;
text-indent:-34.0pt;
page-break-after:avoid;
mso-list:l4 level1 lfo1;
font-size:20.0pt;
font-family:Tele-GroteskFet;
font-weight:normal;}
h2
{margin-top:12.0pt;
margin-right:0cm;
margin-bottom:24.0pt;
margin-left:52.45pt;
text-indent:-45.35pt;
page-break-after:avoid;
mso-list:l4 level2 lfo1;
font-size:18.0pt;
font-family:Tele-GroteskFet;
font-weight:normal;}
h3
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:60.95pt;
margin-bottom:.0001pt;
text-indent:-53.85pt;
page-break-after:avoid;
mso-list:l4 level3 lfo1;
font-size:16.0pt;
font-family:Tele-GroteskFet;
color:black;
font-weight:normal;}
h4
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:43.2pt;
margin-bottom:.0001pt;
text-indent:-43.2pt;
page-break-after:avoid;
mso-list:l4 level4 lfo1;
font-size:14.0pt;
font-family:Tele-GroteskFet;
color:black;
font-weight:normal;}
h5
{margin-top:12.0pt;
margin-right:0cm;
margin-bottom:3.0pt;
margin-left:50.4pt;
text-indent:-50.4pt;
mso-list:l4 level5 lfo1;
font-size:14.0pt;
font-family:Tele-GroteskHal;
font-weight:normal;}
h6
{margin-top:12.0pt;
margin-right:0cm;
margin-bottom:3.0pt;
margin-left:57.6pt;
text-indent:-57.6pt;
mso-list:l4 level6 lfo1;
font-size:12.0pt;
font-family:Tele-GroteskFet;
font-weight:normal;}
p.MsoHeading7, li.MsoHeading7, div.MsoHeading7
{margin-top:12.0pt;
margin-right:0cm;
margin-bottom:3.0pt;
margin-left:64.8pt;
text-indent:-64.8pt;
mso-list:l4 level7 lfo1;
font-size:12.0pt;
font-family:Tele-GroteskHal;}
p.MsoHeading8, li.MsoHeading8, div.MsoHeading8
{margin-top:12.0pt;
margin-right:0cm;
margin-bottom:3.0pt;
margin-left:72.0pt;
text-indent:-72.0pt;
mso-list:l4 level8 lfo1;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoHeading9, li.MsoHeading9, div.MsoHeading9
{margin-top:12.0pt;
margin-right:0cm;
margin-bottom:3.0pt;
margin-left:79.2pt;
text-indent:-79.2pt;
mso-list:l4 level9 lfo1;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoIndex1, li.MsoIndex1, div.MsoIndex1
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:12.0pt;
margin-bottom:.0001pt;
text-indent:-12.0pt;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoToc1, li.MsoToc1, div.MsoToc1
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:7.1pt;
margin-bottom:.0001pt;
font-size:14.0pt;
font-family:Tele-GroteskNor;}
p.MsoToc2, li.MsoToc2, div.MsoToc2
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:12.0pt;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoToc3, li.MsoToc3, div.MsoToc3
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:24.0pt;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoToc4, li.MsoToc4, div.MsoToc4
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:36.0pt;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoToc5, li.MsoToc5, div.MsoToc5
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:48.0pt;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoToc6, li.MsoToc6, div.MsoToc6
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:60.0pt;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoToc7, li.MsoToc7, div.MsoToc7
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:72.0pt;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoToc8, li.MsoToc8, div.MsoToc8
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:84.0pt;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoToc9, li.MsoToc9, div.MsoToc9
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:96.0pt;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoHeader, li.MsoHeader, div.MsoHeader
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:7.1pt;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoFooter, li.MsoFooter, div.MsoFooter
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:7.1pt;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoIndexHeading, li.MsoIndexHeading, div.MsoIndexHeading
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:7.1pt;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:Tele-GroteskUlt;
font-weight:bold;}
p.MsoEnvelopeAddress, li.MsoEnvelopeAddress, div.MsoEnvelopeAddress
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:.05pt;
margin-bottom:.0001pt;
mso-element:frame;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoEnvelopeReturn, li.MsoEnvelopeReturn, div.MsoEnvelopeReturn
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:7.1pt;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
span.MsoFootnoteReference
{font-family:Tele-GroteskNor;
vertical-align:super;}
span.MsoCommentReference
{font-family:Tele-GroteskNor;}
span.MsoLineNumber
{font-family:Tele-GroteskNor;}
span.MsoPageNumber
{font-family:Tele-GroteskNor;}
span.MsoEndnoteReference
{font-family:Tele-GroteskNor;
vertical-align:super;}
p.MsoMacroText, li.MsoMacroText, div.MsoMacroText
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:7.1pt;
margin-bottom:.0001pt;
font-size:10.0pt;
font-family:Tele-GroteskNor;}
p.MsoToaHeading, li.MsoToaHeading, div.MsoToaHeading
{margin-top:6.0pt;
margin-right:0cm;
margin-bottom:0cm;
margin-left:7.1pt;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoListBullet, li.MsoListBullet, div.MsoListBullet
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:21.25pt;
margin-bottom:.0001pt;
text-indent:-21.25pt;
mso-list:l3 level1 lfo2;
mso-element:frame;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoListBullet2, li.MsoListBullet2, div.MsoListBullet2
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:45.35pt;
margin-bottom:.0001pt;
text-indent:-21.25pt;
mso-list:l5 level1 lfo3;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoListBullet3, li.MsoListBullet3, div.MsoListBullet3
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:72.3pt;
margin-bottom:.0001pt;
text-indent:-24.1pt;
mso-list:l2 level1 lfo4;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoListBullet4, li.MsoListBullet4, div.MsoListBullet4
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:96.4pt;
margin-bottom:.0001pt;
text-indent:-24.1pt;
mso-list:l1 level1 lfo5;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoListBullet5, li.MsoListBullet5, div.MsoListBullet5
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:123.3pt;
margin-bottom:.0001pt;
text-indent:-24.05pt;
mso-list:l0 level1 lfo6;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoTitle, li.MsoTitle, div.MsoTitle
{margin-top:12.0pt;
margin-right:0cm;
margin-bottom:3.0pt;
margin-left:7.1pt;
text-align:center;
font-size:22.0pt;
font-family:Tele-Antiqua;
color:gray;}
p.MsoMessageHeader, li.MsoMessageHeader, div.MsoMessageHeader
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:2.0cm;
margin-bottom:.0001pt;
text-indent:-2.0cm;
background:#CCCCCC;
border:none;
padding:0cm;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
p.MsoSubtitle, li.MsoSubtitle, div.MsoSubtitle
{margin-top:0cm;
margin-right:0cm;
margin-bottom:3.0pt;
margin-left:7.1pt;
text-align:center;
font-size:12.0pt;
font-family:Tele-GroteskHal;}
p.MsoBlockText, li.MsoBlockText, div.MsoBlockText
{margin-top:0cm;
margin-right:1.15pt;
margin-bottom:0cm;
margin-left:27.0pt;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
a:link, span.MsoHyperlink
{font-family:Tele-GroteskNor;
color:blue;
text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
{font-family:Tele-GroteskNor;
color:purple;
text-decoration:underline;}
strong
{font-family:Tele-GroteskFet;}
em
{font-family:Tele-GroteskUlt;
font-style:normal;}
p.MsoDocumentMap, li.MsoDocumentMap, div.MsoDocumentMap
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:7.1pt;
margin-bottom:.0001pt;
background:navy;
font-size:12.0pt;
font-family:Tele-GroteskUlt;}
p.MsoPlainText, li.MsoPlainText, div.MsoPlainText
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:7.1pt;
margin-bottom:.0001pt;
font-size:10.0pt;
font-family:Tele-GroteskNor;}
p
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:7.1pt;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:Tele-GroteskNor;}
acronym
{font-family:Tele-GroteskNor;}
address
{margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:7.1pt;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:Tele-GroteskNor;
font-style:normal;
text-decoration:underline;}
code
{font-family:Tele-GroteskNor;}
dfn
{font-family:Tele-GroteskNor;
font-style:normal;}
samp
{font-family:Tele-GroteskNor;}
tt
{font-family:Tele-GroteskNor;}
span.E-MailFormatvorlage35
{mso-style-type:personal-compose;
font-family:Arial;
color:windowtext;}
/* Page Definitions */
@page
{mso-endnote-separator:url("cid:header.htm\@01C4F584.0A7F9C80") es;
mso-endnote-continuation-separator:url("cid:header.htm\@01C4F584.0A7F9C8=
0") ecs;}
@page Section1
{size:595.3pt 841.9pt;
margin:99.25pt 2.0cm 70.9pt 2.0cm;
mso-footer:url("cid:header.htm\@01C4F584.0A7F9C80") f1;}
div.Section1
{page:Section1;}
/* List Definitions */
@list l0
{mso-list-id:-128;
mso-list-type:simple;
mso-list-template-ids:-1158138250;}
@list l0:level1
{mso-level-number-format:bullet;
mso-level-style-link:"Aufz\00E4hlungszeichen 5";
mso-level-text:\F06E;
mso-level-tab-stop:123.3pt;
mso-level-number-position:left;
margin-left:123.3pt;
text-indent:-24.05pt;
mso-ansi-font-size:10.0pt;
font-family:Wingdings;
color:#FF0066;
text-underline:#FF0066;}
@list l1
{mso-list-id:-127;
mso-list-type:simple;
mso-list-template-ids:787791588;}
@list l1:level1
{mso-level-number-format:bullet;
mso-level-style-link:"Aufz\00E4hlungszeichen 4";
mso-level-text:\F06E;
mso-level-tab-stop:96.4pt;
mso-level-number-position:left;
margin-left:96.4pt;
text-indent:-24.1pt;
mso-ansi-font-size:10.0pt;
font-family:Wingdings;
color:#FF0066;
text-underline:#FF0066;}
@list l2
{mso-list-id:-126;
mso-list-type:simple;
mso-list-template-ids:-652344512;}
@list l2:level1
{mso-level-number-format:bullet;
mso-level-style-link:"Aufz\00E4hlungszeichen 3";
mso-level-text:\F06E;
mso-level-tab-stop:72.3pt;
mso-level-number-position:left;
margin-left:72.3pt;
text-indent:-24.1pt;
mso-ansi-font-size:10.0pt;
font-family:Wingdings;
color:#FF0066;
text-underline:#FF0066;}
@list l3
{mso-list-id:-119;
mso-list-type:simple;
mso-list-template-ids:1638926230;}
@list l3:level1
{mso-level-number-format:bullet;
mso-level-style-link:Aufz\00E4hlungszeichen;
mso-level-text:\F06E;
mso-level-tab-stop:21.25pt;
mso-level-number-position:left;
margin-left:21.25pt;
text-indent:-21.25pt;
mso-ansi-font-size:10.0pt;
font-family:Wingdings;
color:#FF0066;
text-underline:#FF0066;}
@list l4
{mso-list-id:1644121226;
mso-list-template-ids:67567653;}
@list l4:level1
{mso-level-style-link:"\00DCberschrift 1";
mso-level-text:%1;
mso-level-tab-stop:21.6pt;
mso-level-number-position:left;
margin-left:21.6pt;
text-indent:-21.6pt;}
@list l4:level2
{mso-level-style-link:"\00DCberschrift 2";
mso-level-text:"%1\.%2";
mso-level-tab-stop:28.8pt;
mso-level-number-position:left;
margin-left:28.8pt;
text-indent:-28.8pt;}
@list l4:level3
{mso-level-style-link:"\00DCberschrift 3";
mso-level-text:"%1\.%2\.%3";
mso-level-tab-stop:36.0pt;
mso-level-number-position:left;
margin-left:36.0pt;
text-indent:-36.0pt;}
@list l4:level4
{mso-level-style-link:"\00DCberschrift 4";
mso-level-text:"%1\.%2\.%3\.%4";
mso-level-tab-stop:43.2pt;
mso-level-number-position:left;
margin-left:43.2pt;
text-indent:-43.2pt;}
@list l4:level5
{mso-level-style-link:"\00DCberschrift 5";
mso-level-text:"%1\.%2\.%3\.%4\.%5";
mso-level-tab-stop:50.4pt;
mso-level-number-position:left;
margin-left:50.4pt;
text-indent:-50.4pt;}
@list l4:level6
{mso-level-style-link:"\00DCberschrift 6";
mso-level-text:"%1\.%2\.%3\.%4\.%5\.%6";
mso-level-tab-stop:57.6pt;
mso-level-number-position:left;
margin-left:57.6pt;
text-indent:-57.6pt;}
@list l4:level7
{mso-level-style-link:"\00DCberschrift 7";
mso-level-text:"%1\.%2\.%3\.%4\.%5\.%6\.%7";
mso-level-tab-stop:64.8pt;
mso-level-number-position:left;
margin-left:64.8pt;
text-indent:-64.8pt;}
@list l4:level8
{mso-level-style-link:"\00DCberschrift 8";
mso-level-text:"%1\.%2\.%3\.%4\.%5\.%6\.%7\.%8";
mso-level-tab-stop:72.0pt;
mso-level-number-position:left;
margin-left:72.0pt;
text-indent:-72.0pt;}
@list l4:level9
{mso-level-style-link:"\00DCberschrift 9";
mso-level-text:"%1\.%2\.%3\.%4\.%5\.%6\.%7\.%8\.%9";
mso-level-tab-stop:79.2pt;
mso-level-number-position:left;
margin-left:79.2pt;
text-indent:-79.2pt;}
@list l5
{mso-list-id:1646740094;
mso-list-type:hybrid;
mso-list-template-ids:1671064250 -946445812 67567619 67567621 67567617 6=
7567619 67567621 67567617 67567619 67567621;}
@list l5:level1
{mso-level-number-format:bullet;
mso-level-style-link:"Aufz\00E4hlungszeichen 2";
mso-level-text:\F06E;
mso-level-tab-stop:45.35pt;
mso-level-number-position:left;
margin-left:45.35pt;
text-indent:-21.25pt;
mso-ansi-font-size:10.0pt;
font-family:Wingdings;
color:#FF0066;
text-underline:#FF0066;}
ol
{margin-bottom:0cm;}
ul
{margin-bottom:0cm;}
-->
</style>
<!--[if gte mso 9]><xml>
<o:shapedefaults v:ext=3D"edit" spidmax=3D"2050" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext=3D"edit">
<o:idmap v:ext=3D"edit" data=3D"1" />
</o:shapelayout></xml><![endif]-->
</head>
<body lang=3DDE link=3Dblue vlink=3Dpurple>
<div class=3DSection1>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>Hi!<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'><o:p> </o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>I just run into a problem with the might_have m=
ethod.<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>I have a table ‘device’ and four
sub-tables called ‘device_router’, ‘device_switch’=
;, ‘device_hub’
and finally ‘device_other’.<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>Every record in the ‘device’ table =
has
one matching record in one of the sub-tables.<o:p></o:p></span></font></p=
>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>I thought about defining four might_have statem=
ents,
but the last overwrites all other 3 with the following warning messages:<=
o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'><o:p> </o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>Subroutine NAC::Device::snmpread redefined at
/usr/local/share/perl/5.8.4/Class/DBI/Relationship.pm line 62.<o:p></o:p>=
</span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>Subroutine NAC::Device::chassismodel redefined =
at
/usr/local/share/perl/5.8.4/Class/DBI/Relationship.pm line 62.<o:p></o:p>=
</span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>Subroutine NAC::Device::memory redefined at
/usr/local/share/perl/5.8.4/Class/DBI/Relationship.pm line 62.<o:p></o:p>=
</span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>Subroutine NAC::Device::flashmem redefined at
/usr/local/share/perl/5.8.4/Class/DBI/Relationship.pm line 62.<o:p></o:p>=
</span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>Subroutine NAC::Device::serialnumber redefined =
at
/usr/local/share/perl/5.8.4/Class/DBI/Relationship.pm line 62.<o:p></o:p>=
</span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>Subroutine NAC::Device::snmpport redefined at
/usr/local/share/perl/5.8.4/Class/DBI/Relationship.pm line 62.<o:p></o:p>=
</span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>Subroutine NAC::Device::ipaddr redefined at
/usr/local/share/perl/5.8.4/Class/DBI/Relationship.pm line 62.<o:p></o:p>=
</span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'><o:p> </o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>WHY?<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'><o:p> </o:p></span></font></p>
<div style=3D'mso-element:para-border-div;border:none;border-bottom:solid=
windowtext 1.0pt;
padding:0cm 0cm 1.0pt 0cm;margin-left:7.1pt;margin-right:0cm'>
<p class=3DMsoNormal style=3D'margin-left:0cm;border:none;padding:0cm'><f=
ont
size=3D2 face=3DArial><span lang=3DEN-GB style=3D'font-size:10.0pt;font-f=
amily:Arial'>This
is a snip from my library:<o:p></o:p></span></font></p>
</div>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'><o:p> </o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>package NAC::Device_Router;<o:p></o:p></span></=
font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>use strict;<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>use base 'NAC::DBI';<o:p></o:p></span></font></=
p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>__PACKAGE__->table($dbtools::schemaname .
'.device_router');<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>__PACKAGE__->columns(Primary &nbs=
p;
=3D> qw/fk_device/);<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>__PACKAGE__->columns(Essential =3D>=
qw/ipaddr snmpport snmpread serialnumber memory flashmem chassismodel/);<=
o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>__PACKAGE__->columns(Others  =
;
=3D> qw//);<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'><o:p> </o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>package NAC::Device_Switch;<o:p></o:p></span></=
font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>use strict;<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>use base 'NAC::DBI';<o:p></o:p></span></font></=
p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>__PACKAGE__->table($dbtools::schemaname .
'.device_switch');<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>__PACKAGE__->columns(Primary &nbs=
p;
=3D> qw/fk_device/);<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>__PACKAGE__->columns(Essential =3D>=
qw/ipaddr snmpport snmpread serialnumber memory flashmem chassismodel/);<=
o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>__PACKAGE__->columns(Others  =
;
=3D> qw//);<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'><o:p> </o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>package NAC::Device;<o:p></o:p></span></font></=
p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>use strict;<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>use base 'NAC::DBI';<o:p></o:p></span></font></=
p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>__PACKAGE__->table($dbtools::schemaname .
'.device');<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>__PACKAGE__->sequence('seq_device');<o:p></o=
:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>__PACKAGE__->columns(Primary &nbs=
p;
=3D> qw/id_device/);<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>__PACKAGE__->columns(Essential =3D>=
qw/fk_monitor scan ping name alias location ping_email/);<o:p></o:p></spa=
n></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>__PACKAGE__->columns(Others  =
;
=3D> qw/fk_device_service_contract service_contract_id service_contrac=
t_startdate/);<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'><o:p> </o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>__PACKAGE__->has_many(interfaces =3D>
'NAC::Interface');<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>__PACKAGE__->might_have(device_router =3D>=
;
'NAC::Device_Router' =3D> qw/ipaddr snmpport snmpread serialnumber mem=
ory
flashmem chassismodel/);<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>__PACKAGE__->might_have(device_switch =3D>=
;
'NAC::Device_Switch' =3D> qw/ipaddr snmpport snmpread serialnumber mem=
ory
flashmem chassismodel/);<o:p></o:p></span></font></p>
<div style=3D'mso-element:para-border-div;border:none;border-bottom:solid=
windowtext 1.0pt;
padding:0cm 0cm 1.0pt 0cm;margin-left:7.1pt;margin-right:0cm'>
<p class=3DMsoNormal style=3D'margin-left:0cm;border:none;padding:0cm'><f=
ont
size=3D2 face=3DArial><span lang=3DEN-GB style=3D'font-size:10.0pt;font-f=
amily:Arial'><o:p> </o:p></span></font></p>
</div>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'><o:p> </o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>And this my test code:<o:p></o:p></span></font>=
</p>
<div style=3D'mso-element:para-border-div;border:none;border-bottom:solid=
windowtext 1.0pt;
padding:0cm 0cm 1.0pt 0cm;margin-left:7.1pt;margin-right:0cm'>
<p class=3DMsoNormal style=3D'margin-left:0cm;border:none;padding:0cm'><f=
ont
size=3D2 face=3DArial><span lang=3DEN-GB style=3D'font-size:10.0pt;font-f=
amily:Arial'><o:p> </o:p></span></font></p>
</div>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'><o:p> </o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>#!/usr/bin/perl<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'><o:p> </o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>require 5;<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>use strict;<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>use lib "../lib";<o:p></o:p></span></=
font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'><o:p> </o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>use nac_objects_dbi;<o:p></o:p></span></font></=
p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'><o:p> </o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>#
--------------------------------------------------------------------<o:p>=
</o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'># main<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>#
--------------------------------------------------------------------<o:p>=
</o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'><o:p> </o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>my $id =3D 1508;<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>#my $id =3D 3032;<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'><o:p> </o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>my $obj_interface =3D NAC::Interface->retrie=
ve($id)
or die 'No such interface';<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>print $obj_interface->port . "\n";=
<o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'>print $obj_interface->device->name .
"\n";<o:p></o:p></span></font></p>
<p class=3DMsoNormal style=3D'margin-left:0cm;text-indent:7.1pt'><font si=
ze=3D2
face=3DArial><span lang=3DEN-GB style=3D'font-size:10.0pt;font-family:Ari=
al'>print
$obj_interface->device->device_switch->chassismodel . "\n&q=
uot;;<o:p></o:p></span></font></p>
<div style=3D'mso-element:para-border-div;border:none;border-bottom:solid=
windowtext 1.0pt;
padding:0cm 0cm 1.0pt 0cm;margin-left:7.1pt;margin-right:0cm'>
<p class=3DMsoNormal style=3D'margin-left:0cm;border:none;padding:0cm'><f=
ont
size=3D2 face=3DArial><span lang=3DEN-GB style=3D'font-size:10.0pt;font-f=
amily:Arial'><o:p> </o:p></span></font></p>
</div>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'><o:p> </o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 face=3DArial><span lang=3DEN-GB style=
=3D'font-size:
10.0pt;font-family:Arial'><o:p> </o:p></span></font></p>
<div>
<div>
<p><font size=3D2 face=3DArial><span lang=3DEN-GB style=3D'font-size:10.0=
pt;font-family:
Arial'>With kind regards<o:p></o:p></span></font></p>
<p><font size=3D2 face=3DArial><span lang=3DEN-GB style=3D'font-size:10.0=
pt;font-family:
Arial'>Alexander Hartmaier<o:p></o:p></span></font></p>
<p><font size=3D2 face=3DArial><span lang=3DEN-GB style=3D'font-size:10.0=
pt;font-family:
Arial'><o:p> </o:p></span></font></p>
<p><font size=3D2 face=3DArial><span lang=3DEN-GB style=3D'font-size:10.0=
pt;font-family:
Arial'>T-Systems <st1:country-region w:st=3D"on"><st1:place w:st=3D"on">A=
ustria</st1:place></st1:country-region>
GesmbH<o:p></o:p></span></font></p>
<p><font size=3D2 face=3DArial><span style=3D'font-size:10.0pt;font-famil=
y:Arial'>Rennweg
97-99 1030 Wien<o:p></o:p></span></font></p>
<p><font size=3D2 face=3DArial><span style=3D'font-size:10.0pt;font-famil=
y:Arial'><o:p> </o:p></span></font></p>
<p><font size=3D2 face=3DArial><span style=3D'font-size:10.0pt;font-famil=
y:Arial'>phone:
+43 57057-4320<o:p></o:p></span></font></p>
<p><font size=3D2 face=3DArial><span style=3D'font-size:10.0pt;font-famil=
y:Arial'>fax:
+43 57057-95-4320<o:p></o:p></span></font></p>
<p><font size=3D2 face=3DArial><span style=3D'font-size:10.0pt;font-famil=
y:Arial'>mobile:
+43 676 8642 4320<o:p></o:p></span></font></p>
<p><font size=3D2 face=3DArial><span style=3D'font-size:10.0pt;font-famil=
y:Arial'>mail:
alexander.hartmaier@xxxxxxxxx.xx<o:p></o:p></span></font></p>
<p><font size=3D2 face=3DArial><span style=3D'font-size:10.0pt;font-famil=
y:Arial'>internet:
<a href=3D"http://www.t-systems.at/">http://www.t-systems.at</a><o:p></o:=
p></span></font></p>
</div>
</div>
<p><font size=3D2 face=3DArial><span style=3D'font-size:10.0pt;font-famil=
y:Arial'><o:p> </o:p></span></font></p>
<p class=3DMsoNormal style=3D'margin-left:0cm'><font size=3D3 face=3DTele=
-GroteskNor><span
lang=3DDE-AT style=3D'font-size:12.0pt'><o:p> </o:p></span></font></=
p>
</div>
<br>*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*=
"*"*"*"*<br>Hinweis: Dieses E-mail kann vertrauliche und gesch=FCtzte Inf=
ormationen enthalten.<br>Sollten Sie nicht der beabsichtigte Empf=E4nger =
sein, verst=E4ndigen Sie bitte den Absender und l=F6schen Sie dieses E-ma=
il dann sofort.<br><br>Notice: This e-mail contains information that is c=
onfidential and may be privileged.<br>If you are not the intended recipie=
nt, please notify the sender and then delete this e-mail immediately.<br>=
*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*=
"*"*</body>
</html>
------_=_NextPart_001_01C4F57B.A8568F92--
|
might_have problem
|
|
Re: might_have problem
|
|
Re: might_have problem
|
Generated at 12:15 on 16 Jan 2005 by mariachi v0.52