Lines Matching full:paths

36     my @paths = (
47     my @l = map { length } @paths;
50     create_file $_ for @paths;
68     push @paths, "$work94/x$x60/${x95}x256";	# 256 chars
69     push @l, length $paths[-1];
70     create_file $paths[-1];
75     unlink $paths[-1];
76     $paths[-1] = "$work94/${x95}xc100";		# 100 char filename
77     $l[-1] = length $paths[-1];
78     create_file $paths[-1];
82     unlink $paths[-1];
83     $paths[-1] = "$work94/${x95}xc100/x";	# 100 char component
84     $l[-1] = length $paths[-1];
85     create_file $paths[-1];