1*2633Sahl /* 2*2633Sahl * CDDL HEADER START 3*2633Sahl * 4*2633Sahl * The contents of this file are subject to the terms of the 5*2633Sahl * Common Development and Distribution License (the "License"). 6*2633Sahl * You may not use this file except in compliance with the License. 7*2633Sahl * 8*2633Sahl * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 9*2633Sahl * or http://www.opensolaris.org/os/licensing. 10*2633Sahl * See the License for the specific language governing permissions 11*2633Sahl * and limitations under the License. 12*2633Sahl * 13*2633Sahl * When distributing Covered Code, include this CDDL HEADER in each 14*2633Sahl * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 15*2633Sahl * If applicable, add the following below this CDDL HEADER, with the 16*2633Sahl * fields enclosed by brackets "[]" replaced with your own identifying 17*2633Sahl * information: Portions Copyright [yyyy] [name of copyright owner] 18*2633Sahl * 19*2633Sahl * CDDL HEADER END 20*2633Sahl */ 21*2633Sahl 22*2633Sahl /* 23*2633Sahl * Copyright 2006 Sun Microsystems, Inc. All rights reserved. 24*2633Sahl * Use is subject to license terms. 25*2633Sahl */ 26*2633Sahl 27*2633Sahl #pragma ident "%Z%%M% %I% %E% SMI" 28*2633Sahl 29*2633Sahl #pragma D option quiet 30*2633Sahl #pragma D option strsize=16 31*2633Sahl 32*2633Sahl BEGIN 33*2633Sahl { 34*2633Sahl this->str = ",,,Carrots,,Barley,Oatmeal,,,,,,,,,,,,,,,,,,Beans,"; 35*2633Sahl } 36*2633Sahl 37*2633Sahl BEGIN 38*2633Sahl { 39*2633Sahl strtok(this->str, ","); 40*2633Sahl } 41*2633Sahl 42*2633Sahl BEGIN 43*2633Sahl { 44*2633Sahl this->str = ",,,,,,,,,,,,,,,,,,,,,,Carrots,"; 45*2633Sahl strtok(this->str, ","); 46*2633Sahl } 47*2633Sahl 48*2633Sahl BEGIN 49*2633Sahl { 50*2633Sahl strtok(this->str, "a"); 51*2633Sahl } 52*2633Sahl 53*2633Sahl BEGIN 54*2633Sahl { 55*2633Sahl printf("%s\n", substr(this->str, 1, 40)); 56*2633Sahl } 57*2633Sahl 58*2633Sahl BEGIN 59*2633Sahl { 60*2633Sahl printf("%s\n", strjoin(this->str, this->str)); 61*2633Sahl } 62*2633Sahl 63*2633Sahl BEGIN 64*2633Sahl { 65*2633Sahl this->str1 = "........................................."; 66*2633Sahl printf("%d\n", index(this->str, this->str1)); 67*2633Sahl } 68*2633Sahl 69*2633Sahl BEGIN 70*2633Sahl { 71*2633Sahl printf("%d\n", rindex(this->str, this->str1)); 72*2633Sahl } 73*2633Sahl 74*2633Sahl BEGIN 75*2633Sahl { 76*2633Sahl exit(0); 77*2633Sahl } 78