The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
%!PS-Adobe-2.0 EPSF-1.2
%%BoundingBox: -5 130 250 310
%%Creator: Gisle Aas (Copyright 1998)

%require "common.ps"
%require "sv-8.ps"
%require "box.ps"
%require "rect.ps"
%require "ptr.ps"
%require "mws.ps"
%require "magic.ps"

0 300 sv

/Courier 8 SF
40  302 M (sv) rshow
105 302 M (xpvlv) rshow

55 300 8 11 newbox
55 300 11 box

/Helvetica 11 SF
60 303 15 sub M

[(PVX) (CUR) (LEN) (IVX) (NVX) (MAGIC) (STASH) (TARGOFF) (TARGLEN) (TARG) (TYPE)] {
    gsave
    currentpoint 40 mws pop
    grestore
    0 -15 rmoveto
} forall

105 157.5 130 ptr1
130 165 sv


105 217.5 130 245 ptrn

gsave
130 250 translate 0.7 dup scale

0 0 ('x') smagic
65 -15 [() () () (&magic_setsubstr) ()] mgvtbl
grestore