Searched refs:split (Results 1 - 25 of 190) sorted by relevance

12345678

/opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/t/op/
H A Dsplit.t15 ($a,$b,$c) = split($FS,$_);
19 @ary = split(/:b:/);
23 my @xyz = (@ary = split(//));
27 @ary = split(/:/);
30 $_ = join(':',split(' '," a b\tc \t d "));
33 $_ = join(':',split(/ */,"foo bar bie\tdoll"));
36 $_ = join(':', 'foo', split(/ /,'a b c'), 'bar');
39 # Can we say how many fields to split to?
40 $_ = join(':', split(' ','1 2 3 4 5 6', 3));
45 $_ = join(':', split(' ','
[all...]
H A Dcproto.t14 my ($keyword, $proto) = split;
218 split undef
H A Dpush.t5 @tests = split(/\n/, <<EOF);
36 ($list,$get,$leave) = split(/,\t*/,$line);
37 ($pos, $len, @list) = split(' ',$list);
38 @get = split(' ',$get);
39 @leave = split(' ',$leave);
H A Dglob.t14 map { delete $files{"op/$_"} } split /[\s\n]/, `dir /b /l op & dir /b /l /ah op 2>nul`,
18 map { s/;.*$//; delete $files{lc($_)}; } split /[\n]/, `directory/noheading/notrailing/versions=1 [.op]`,
23 map { delete $files{$_} } split /[\s\n]/, `echo :op:\xc5`;
27 map { delete $files{$_} } split /[\s\n]/, `echo op/*`;
H A Dgroups.t93 my @g0 = split /,/, $gr;
123 for (split(' ', $()) {
138 $gr1 = join(' ', grep(!$did{$_}++, sort split(' ', join(' ', @gr))));
148 $gr2 = join(' ', grep(!$basegroup{$_}++, sort split(' ',$groups)));
158 $gr2 = join(' ', grep(!$basegroup{$_}++, sort split(' ',$groups)));
H A Deach.t63 $size = ((split('/',scalar %h))[1]);
65 $newsize = ((split('/',scalar %h))[1]);
68 $size = ((split('/',scalar %h))[1]);
71 $size = ((split('/',scalar %h))[1]);
75 $size = ((split('/',scalar %h))[1]);
101 $size = (split('/', scalar %hash))[1];
103 ok ($size == (split('/', scalar %hash))[1]);
105 ok ($size != (split('/', scalar %hash))[1]);
H A Drunlevel.t20 @prgs = split "\n########\n", <DATA>;
32 my($prog,$expected) = split(/\nEXPECT\n/, $_);
118 (split(/./, 'x'x10000))[0];
187 (split(/./, 'x'x10000))[0];
277 (split(/./, 'x'x10000))[0];
398 (split(/./, 'x'x10000))[0];
H A Dindex.t57 my @needles = split ( //, $needle );
62 is($a, $b, q{[perl #22375] 'split'/'index' problem for utf8});
65 @needles = split ( //, $needle );
69 is($a, $b, q{[perl #22375] 'split'/'index' problem for utf8});
/opensolaris-onvv-gate/usr/src/common/openssl/crypto/des/t/
H A Dtest9 @a=split(//,$ks);
16 @a=split(//,$key);
21 @a=split(//,$k1);
24 @a=split(//,$k2);
/opensolaris-onvv-gate/usr/src/cmd/split/
H A DMakefile29 PROG= split
/opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/t/comp/
H A Dbproto.t30 test_too_many($_) for split /\n/,
36 test_no_error($_) for split /\n/,
/opensolaris-onvv-gate/usr/src/cmd/sgs/packages/common/
H A Dreadme_revision64 @_ = split /\//, $0;
133 @wsname = split /\//, $wsname;
/opensolaris-onvv-gate/usr/src/tools/onbld/Scm/
H A DVersion.py80 l = map(int, ver.split('.'))
95 desired = map(int, desired.split('.'))
/opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Text/
H A DSoundex.t52 ($in, $out) = split (':');
83 ($in, $out) = split (':');
/opensolaris-onvv-gate/usr/src/cmd/ypcmd/
H A Dmulti.awk.sh56 numnames = split(namelist[$1], n);
88 numaddr = split(addr[host], tmpaddr, ",");
90 numnames = split(namelist[tmpaddr[i]], tmpname);
/opensolaris-onvv-gate/usr/src/cmd/dtrace/test/tst/common/cpc/
H A Dtst.platformevent.ksh47 @a = split(/ /, \$_);
/opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/ExtUtils/
H A Dinstmodsh32 my $class = (split(' ', $reply))[1];
46 my $class = (split(' ', $reply))[1];
60 my $file = (split(' ', $reply))[1];
120 do_module((split(' ', $reply))[1]);
/opensolaris-onvv-gate/usr/src/tools/depcheck/
H A Dget_depend_info250 @infolines = split(/\s*\n\s*/, $string);
254 @words = split(/\s/, $line);
308 @list = split(/\n/, $LddInfo);
344 @infolines = split(/\s*\n\s*/, $string);
353 @words = split(/\s/, $line);
398 @infolines = split(/\s*\n\s*/, $string);
429 @words = split(/\s/, $line);
463 @list = split(/\n/, $LddInfo);
483 @list = split(/\n/, $StringInfo);
524 @files = split(/\
[all...]
/opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Math/BigRat/t/
H A Dbigratpm.inc27 @args = split(/:/,$1,99);
31 @args = split(/:/,$_,99); $ans = pop(@args);
/opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Test/Simple/t/
H A Ddiag.t34 push @lines, split(/\n/, $output);
/opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/t/cmd/
H A Dfor.t40 for (split(' ','a b c d e')) {
/opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/ext/B/t/
H A Dterse.t38 # split up the output lines into individual ops (terse is, well, terse!)
40 my @lines = split(/\n+/, $out->read);
74 my $boo = split('', $foo);
/opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Tie/
H A DRefHash.t214 foreach (split /\n/, $warning) {
257 push @r, split /\n/, <<"END"
276 push @r, split /\n/, <<"END"
294 @slicetests = split /\n/, <<'END'
307 push @r, split(/\n/, $STD_TESTS);
311 push @r, '%h = ();', split(/\n/, $STD_TESTS);
/opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/
H A Dstrict.t32 @prgs = (@prgs, split "\n########\n", <F>) ;
48 my($prog,$expected) = split(/\nEXPECT\n/, $_);
50 my(@files) = split(/\n--FILE--\s*([^\s\n]*)\s*\n/, $prog) ;
52 die "Internal error test $i didn't split into pairs, got " .
H A Dwarnings.t55 @prgs = (@prgs, $file, split "\n########\n", <F>) ;
78 my($prog,$expected) = split(/\nEXPECT\n/, $_);
80 my(@files) = split(/\n--FILE--\s*([^\s\n]*)\s*\n/, $prog) ;
82 die "Internal error test $i didn't split into pairs, got " .
155 foreach my $option (split(' ', $1)) {
197 my @got = sort split "\n", $got ;
198 my @expected = sort split "\n", $expected ;

Completed in 226 milliseconds

12345678