Select Code to Download

perl -MExtUtils::Miniperl -e writemain>butter.c

cl -c -nologo -Gf -W3 -IC:\perl\lib\CORE -DWIN32 -D_CONSOLE -DNO_STRIC
+T  -DPERLDLL -DPERL_CORE -O1 -MD -DNDEBUG -DPERL_EXTERNAL_GLOB butter
+.c

link -nologo -nodefaultlib -release  -libpath:"C:/Perl\lib\CORE"  -mac
+hine:x86    oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.l
+ib  comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib  net
+api32.lib uuid.lib wsock32.lib mpr.lib winmm.lib  version.lib odbc32.
+lib odbccp32.lib msvcrt.lib msvcrt.lib  perl56.lib butter.obj

/*
 * "The Road goes ever on and on, down from the door where it began."
...
    char *file = __FILE__;
    dXSUB_SYS;
}