Filename	/usr/lib/x86_64-linux-gnu/perl/5.20/Fcntl.pm
Statements	Executed 12 statements in 691µs

Subroutines

Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	19µs	38µs	Fcntl::::BEGIN@3Fcntl::BEGIN@3
1	1	1	7µs	7µs	Fcntl::::O_NOFOLLOWFcntl::O_NOFOLLOW (xsub)
1	1	1	3µs	3µs	Fcntl::::O_LARGEFILEFcntl::O_LARGEFILE (xsub)
1	1	1	3µs	3µs	Fcntl::::O_BINARYFcntl::O_BINARY (xsub)

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					package Fcntl;
2
3	2	321µs	2	57µs	# spent 38µs (19+19) within Fcntl::BEGIN@3 which was called: # once (19µs+19µs) by IO::Seekable::BEGIN@12 at line 3 use strict; # spent 38µs making 1 call to Fcntl::BEGIN@3 # spent 19µs making 1 call to strict::import
4	1	600ns			our($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS);
5
6	1	700ns			require Exporter;
7	1	300ns			require XSLoader;
8	1	4µs			@ISA = qw(Exporter);
9	1	100ns			$VERSION = '1.11';
10
11	1	304µs	1	291µs	XSLoader::load(); # spent 291µs making 1 call to XSLoader::load
12
13					# Named groups of exports
14	1	13µs			%EXPORT_TAGS = (
15					'flock' => [qw(LOCK_SH LOCK_EX LOCK_NB LOCK_UN)],
16					'Fcompat' => [qw(FAPPEND FASYNC FCREAT FDEFER FDSYNC FEXCL FLARGEFILE
17					FNDELAY FNONBLOCK FRSYNC FSYNC FTRUNC)],
18					'seek' => [qw(SEEK_SET SEEK_CUR SEEK_END)],
19					'mode' => [qw(S_ISUID S_ISGID S_ISVTX S_ISTXT
20					_S_IFMT S_IFREG S_IFDIR S_IFLNK
21					S_IFSOCK S_IFBLK S_IFCHR S_IFIFO S_IFWHT S_ENFMT
22					S_IRUSR S_IWUSR S_IXUSR S_IRWXU
23					S_IRGRP S_IWGRP S_IXGRP S_IRWXG
24					S_IROTH S_IWOTH S_IXOTH S_IRWXO
25					S_IREAD S_IWRITE S_IEXEC
26					S_ISREG S_ISDIR S_ISLNK S_ISSOCK
27					S_ISBLK S_ISCHR S_ISFIFO
28					S_ISWHT S_ISENFMT
29					S_IFMT S_IMODE
30					)],
31					);
32
33					# Items to export into callers namespace by default
34					# (move infrequently used names to @EXPORT_OK below)
35	1	9µs			@EXPORT =
36					qw(
37					FD_CLOEXEC
38					F_ALLOCSP
39					F_ALLOCSP64
40					F_COMPAT
41					F_DUP2FD
42					F_DUPFD
43					F_EXLCK
44					F_FREESP
45					F_FREESP64
46					F_FSYNC
47					F_FSYNC64
48					F_GETFD
49					F_GETFL
50					F_GETLK
51					F_GETLK64
52					F_GETOWN
53					F_NODNY
54					F_POSIX
55					F_RDACC
56					F_RDDNY
57					F_RDLCK
58					F_RWACC
59					F_RWDNY
60					F_SETFD
61					F_SETFL
62					F_SETLK
63					F_SETLK64
64					F_SETLKW
65					F_SETLKW64
66					F_SETOWN
67					F_SHARE
68					F_SHLCK
69					F_UNLCK
70					F_UNSHARE
71					F_WRACC
72					F_WRDNY
73					F_WRLCK
74					O_ACCMODE
75					O_ALIAS
76					O_APPEND
77					O_ASYNC
78					O_BINARY
79					O_CREAT
80					O_DEFER
81					O_DIRECT
82					O_DIRECTORY
83					O_DSYNC
84					O_EXCL
85					O_EXLOCK
86					O_LARGEFILE
87					O_NDELAY
88					O_NOCTTY
89					O_NOFOLLOW
90					O_NOINHERIT
91					O_NONBLOCK
92					O_RANDOM
93					O_RAW
94					O_RDONLY
95					O_RDWR
96					O_RSRC
97					O_RSYNC
98					O_SEQUENTIAL
99					O_SHLOCK
100					O_SYNC
101					O_TEMPORARY
102					O_TEXT
103					O_TRUNC
104					O_WRONLY
105					);
106
107					# Other items we are prepared to export if requested
108					@EXPORT_OK = (qw(
109					DN_ACCESS
110					DN_ATTRIB
111					DN_CREATE
112					DN_DELETE
113					DN_MODIFY
114					DN_MULTISHOT
115					DN_RENAME
116					F_GETLEASE
117					F_GETSIG
118					F_NOTIFY
119					F_SETLEASE
120					F_SETSIG
121					LOCK_MAND
122					LOCK_READ
123					LOCK_RW
124					LOCK_WRITE
125					O_IGNORE_CTTY
126					O_NOATIME
127					O_NOLINK
128					O_NOTRANS
129	1	22µs			), map {@{$_}} values %EXPORT_TAGS);
130
131	1	17µs			1;
					# spent 3µs within Fcntl::O_BINARY which was called: # once (3µs+0s) by parent::import at line 113 of File/Temp.pm sub Fcntl::O_BINARY; # xsub
					# spent 3µs within Fcntl::O_LARGEFILE which was called: # once (3µs+0s) by parent::import at line 113 of File/Temp.pm sub Fcntl::O_LARGEFILE; # xsub
					# spent 7µs within Fcntl::O_NOFOLLOW which was called: # once (7µs+0s) by parent::import at line 113 of File/Temp.pm sub Fcntl::O_NOFOLLOW; # xsub