OpenFrame(3)

🦋 OpenFrame(3) — the manual, but make it bestie

okay so. this is OpenFrame, and it's a User Contributed Perl Documentation page. it's giving framework. it's giving network services. let's get into it 💅

---

✨ NAME ✨

OpenFrame — a framework for network enabled applications 🌸

---

🎀 SYNOPSIS 🎀

use OpenFrame;

that's it. that's the whole vibe. one line and you're in 🫶

---

💖 DESCRIPTION 💖

So. OpenFrame is a framework for network services that serves to multiple media channels — like, for instance, the web, WAP, and digital television. no cap, all of them.

It's built around the Pipeline API, and it provides extra abstraction so that delivering a single application to multiple channels is way easier. main character framework behavior, honestly. one app, many channels, slay ✨

---

💜 GLOBAL VARIABLES 💜

The most important thing this module does is provide a wrapper around OpenFrame specific debug information — for example, the information provided by OpenFrame segments. debugging but make it cozy 🐛

This variable is a hash called %DEBUG in the OpenFrame package. Here's the tea:

• Set the ALL key to a true value → debugging information about all segments gets printed. every last one. the whole group chat is talking 🔥
• Want your debugging output resolved down to a single module instead? Then set a key that matches the segment's name to a true value.

For example, setting:

$OpenFrame::DEBUG{'OpenFrame::Segment::HTTP::Request'} = 1

would mean that all the debug messages from the HTTP::Request segment would get printed. just that one. so targeted. so demure 🎀

---

🌈 SETTING UP YOUR SERVER 🌈

This will briefly explain how to set up a stand-alone OpenFrame server. It uses the code listing below, so keep your eyes on the numbers, bestie — they matter 👑

• The first few lines (01-08) simply load all the modules that are needed to setup the various constituent parts of an OpenFrame server.
• Line 9 creates an HTTP daemon listening on port 8080 for requests. In the case that the server cannot be created, line 10 provides error reporting to the screen.
• The first real piece of OpenFrame code is found at line 14, where we create a Pipeline object, followed quickly by lines 16, 17 and 18 which create a couple of pipeline segments that will be added to the pipeline at line 21.
• Lines 24 and 26 create a loop to listen for and accept connections, and fetch HTTP requests from those connections as and when it is needed.
• At line 28 we create a Pipeline::Store::Simple object, which will act as our data container for the information flowing down the pipeline. We add the request to the store and the store to the pipeline at line 31, and then call the dispatch() method on the pipeline at line 34. This sets the OpenFrame side of things going.
• At line 37 we ask the pipeline for the store and the store for an HTTP::Response object, and then send it back to the client at line 40.

The real work of OpenFrame is in the segments that are created, and the order in which they are inserted into the Pipeline. With this in mind, you know everything there is to know about OpenFrame. periodt. 💅

---

🧚 CODE LISTING 🧚

01: use strict;
02: use warnings;
03:
04: use Pipeline;
05: use HTTP::Daemon;
06: use OpenFrame::Segment::HTTP::Request;
07: use OpenFrame::Segment::ContentLoader;
08:
09: my $d = HTTP::Daemon->new( LocalPort => '8080', Reuse => 1);
10: die $! unless $d;
11:
12: print "server running at http://localhost:8080/\n";
13:
14: my $pipeline = Pipeline->new();
15:
16: my $hr = OpenFrame::Segment::HTTP::Request->new();
17: my $cl = OpenFrame::Segment::ContentLoader->new()
18:                                        ->directory("./webpages");
19:
20:
21: $pipeline->add_segment( $hr, $cl );
22:
23:
24: while(my $c = $d->accept()) {
25:
26:   while(my $r = $c->get_request) {
27:
28:     my $store = Pipeline::Store::Simple->new();
29:
30:
31:     $pipeline->store( $store->set( $r ) );
32:
33:
34:     $pipeline->dispatch();
35:
36:
37:     my $response = $pipeline->store->get('HTTP::Response');
38:
39:
40:     $c->send_response( $response );
41:   }
42: }

---

👀 SEE ALSO 👀

perl(1) Pipeline(3) OpenFrame::Config(3)

go read those too, iykyk 📚

---

🌸 AUTHOR 🌸

James A. Duncan <jduncan@fotango.com>

---

and that's the whole page, bestie!! 💖 this one shipped as part of perl v5.42.0, dated 2025-07-25 — iconic, historic, we love to see it. now go build something for the web, WAP, and digital television at the same time like the absolute legend you are 🦋✨👑