| CARVIEW |
Select Language
HTTP/2 302
server: nginx
date: Thu, 31 Jul 2025 01:44:01 GMT
content-type: text/plain; charset=utf-8
content-length: 0
x-archive-redirect-reason: found capture at 20210116115348
location: https://web.archive.org/web/20210116115348/https://perl5.git.perl.org/perl5.git/blob/HEAD:/form.h
server-timing: captures_list;dur=1.047527, exclusion.robots;dur=0.041032, exclusion.robots.policy;dur=0.016626, esindex;dur=0.024172, cdx.remote;dur=22.314748, LoadShardBlock;dur=110.593526, PetaboxLoader3.datanode;dur=93.197372
x-app-server: wwwb-app217
x-ts: 302
x-tr: 166
server-timing: TR;dur=0,Tw;dur=0,Tc;dur=0
set-cookie: SERVER=wwwb-app217; path=/
x-location: All
x-rl: 0
x-na: 0
x-page-cache: MISS
server-timing: MISS
x-nid: DigitalOcean
referrer-policy: no-referrer-when-downgrade
permissions-policy: interest-cohort=()
HTTP/2 200
server: nginx
date: Thu, 31 Jul 2025 01:44:02 GMT
content-type: application/xhtml+xml; charset=utf-8
x-archive-orig-date: Sat, 16 Jan 2021 11:53:48 GMT
x-archive-orig-server: Apache/2.4.6 (CentOS) OpenSSL/1.0.2k-fips
x-archive-orig-keep-alive: timeout=5, max=100
x-archive-orig-connection: Keep-Alive
x-archive-orig-x-crawler-transfer-encoding: chunked
x-archive-orig-content-length: 9850
x-archive-guessed-content-type: text/html
x-archive-guessed-charset: utf-8
memento-datetime: Sat, 16 Jan 2021 11:53:48 GMT
link: ; rel="original", ; rel="timemap"; type="application/link-format", ; rel="timegate", ; rel="first memento"; datetime="Sat, 16 Jan 2021 11:53:48 GMT", ; rel="memento"; datetime="Sat, 16 Jan 2021 11:53:48 GMT", ; rel="last memento"; datetime="Sat, 16 Jan 2021 11:53:48 GMT"
content-security-policy: default-src 'self' 'unsafe-eval' 'unsafe-inline' data: blob: archive.org web.archive.org web-static.archive.org wayback-api.archive.org athena.archive.org analytics.archive.org pragma.archivelab.org wwwb-events.archive.org
x-archive-src: CC-MAIN-2021-04-1610703506640.22-0032/CC-MAIN-20210116104719-20210116134719-00650.warc.gz
server-timing: captures_list;dur=0.647940, exclusion.robots;dur=0.025231, exclusion.robots.policy;dur=0.011416, esindex;dur=0.013145, cdx.remote;dur=9.324871, LoadShardBlock;dur=122.164886, PetaboxLoader3.datanode;dur=105.513884, load_resource;dur=115.888197, PetaboxLoader3.resolve;dur=56.781637
x-app-server: wwwb-app217
x-ts: 200
x-tr: 319
server-timing: TR;dur=0,Tw;dur=0,Tc;dur=0
x-location: All
x-rl: 0
x-na: 0
x-page-cache: MISS
server-timing: MISS
x-nid: DigitalOcean
referrer-policy: no-referrer-when-downgrade
permissions-policy: interest-cohort=()
perl5.git.perl.org Git - perl5.git/blob - form.h
1 /* form.h
2 *
3 * Copyright (C) 1991, 1992, 1993, 2000, 2004, 2011 by Larry Wall and others
4 *
5 * You may distribute under the terms of either the GNU General Public
6 * License or the Artistic License, as specified in the README file.
7 *
8 */
10 #define FF_END 0 /* tidy up, then return */
11 #define FF_LINEMARK 1 /* start (or end) of a line */
12 #define FF_LITERAL 2 /* append <arg> literal chars */
13 #define FF_SKIP 3 /* skip <arg> chars in format */
14 #define FF_FETCH 4 /* get next item and set field size to <arg> */
15 #define FF_CHECKNL 5 /* find max len of item (up to \n) that fits field */
16 #define FF_CHECKCHOP 6 /* like CHECKNL, but up to highest split point */
17 #define FF_SPACE 7 /* append padding space (diff of field, item size) */
18 #define FF_HALFSPACE 8 /* like FF_SPACE, but only append half as many */
19 #define FF_ITEM 9 /* append a text item, while blanking ctrl chars */
20 #define FF_CHOP 10 /* (for ^*) chop the current item */
21 #define FF_LINEGLOB 11 /* process @* */
22 #define FF_DECIMAL 12 /* do @##, ^##, where <arg>=(precision|flags) */
23 #define FF_NEWLINE 13 /* delete trailing spaces, then append \n */
24 #define FF_BLANK 14 /* for arg==0: do '~'; for arg>0 : do '~~' */
25 #define FF_MORE 15 /* replace long end of string with '...' */
26 #define FF_0DECIMAL 16 /* like FF_DECIMAL but for 0### */
27 #define FF_LINESNGL 17 /* process ^* */