1Net::HL7::Request(3) User Contributed Perl Documentation Net::HL7::Request(3)
2
3
4
6 Net::HL7::Request
7
9 my $request = new Net::HL7::Request(); my $conn = new
10 Net::HL7::Connection('localhost', 8089);
11
12 my $msh = new Net::HL7::Segments::MSH();
13
14 my $seg1 = new Net::HL7::Segment("PID");
15
16 $seg1->setField(1, "foo");
17
18 $request->addSegment($msh); $request->addSegment($seg1);
19
20 my $response = $conn->send($request);
21
23 The Net::HL7::Request simply extends the Net::HL7::Message class.
24
26 See Net::HL7::Message.
27
29 D.A.Dokter <dokter@wyldebeast-wunderliebe.com>
30
32 Copyright (c) 2002 D.A.Dokter. All rights reserved. This program is
33 free software; you can redistribute it and/or modify it under the same
34 terms as Perl itself.
35
36
37
38perl v5.34.0 2021-07-22 Net::HL7::Request(3)