Perl heeft twee functies om u te helpen tekens in een string kapitaliseren . De functie " ucfirst " kapitaliseert slechts 's een string eerste teken , terwijl de functie " uc " kapitaliseert elk karakter . Deze functie is handig wanneer u twee of meer tekenreeksen vergelijken zonder zorgen over de zaak . Draaien van een string in beginhoofdletters veel moeilijker naarmate Perl geen beschikbaar stringfunctie om dat te doen . U kunt echter de " s " operator gebruiken om de eerste letters van elk woord in een string te vinden en vervolgens kapitaliseren hen. Instructies 1 Open het Perl-programma bestand . Plaats de cursor waar u wilt een string kapitaliseren . Typ de volgende code : $ string = " . Inhoud van mijn string " ; $ string = ucfirst ( $ string ) ; afdruk $ string ; Dit creëert een string variabele die bestaat uit uitsluitend kleine letters . Het roept dan de ucfirst functie om het eerste teken in de tekenreeks kapitaliseren . Het resultaat van het print-statement is "content Mijn snaar . " Typ de volgende code 2 : $ string = "content mijn string . " ; $ string = uc ( $ string ) ; afdruk $ string ; Hiermee wordt de string variabele . Vervolgens , de string noemt de uc -functie om elk karakter in de string kapitaliseren . Het resultaat van het print-statement is " CONTENT MIJN STRING 'S . " 3 Typ de volgende code : $ string = "content mijn string . " ; $ string = ~ s /( [ \\ w ' ] + ) /\\ u \\ L $ 1 /g ; afdruk $ string ; Deze ingewikkelde stukje code maakt gebruik van de " s ///" operator , die voorvallen die door de eerste expressie met de tweede meegeleverde vervangt . In dit geval loopt door de string naar het eerste teken van elk woord zijn. Normaal gesproken zou het teken na de apostrof worden beschouwd als een nieuw woord , maar de eerste expressie vertelt de operator om apostrofs negeren . Zodra hij degene opgegeven tekens , het activeert hen. Het resultaat van het print-statement is " Content Mijn String 's . " 4 Sla het Perl-programma -bestand en voer het uit in uw versie van Perl . < br > |