#!/usr/bin/perl
# -*- mode: cperl; coding: utf-8; -*-

use strict;
use warnings;
use utf8;

use lib "/h/hamren/src/post/lib", "."; my $rval = do "common.pm" || die "$0: common.pm failed ($!) [$@]";  #--- Single-line common initializer

#--- End of header

sub qqq($) { return i("@_"); }

post(
    header(),

    p(read_main_redgreenblue_article("C++/Qt")),

    p("Here I have used Qt's abstractions for socket, so sorry, no down-and-dirty socket()/bind()/accept() code."),

    h2("The source code"),

    p("This source is split in two files, since Qt wants a header file to scan; putting the class declarations in the «.cc» file does not work.",
      " And anyway, it is good style, and more readable, to put declarations is a separate header file."),

    h3("The Qt project file"),
    source_file("./redgreenblue.pro.source"),

    h3("Header file"),
    source_file("./redgreenblue.h.source"),

    h3("Source file"),
    source_file("./redgreenblue.cc.source"),

    footer()
);
__END__