kurs:search_and_replace.pl
Differences
This shows you the differences between two versions of the page.
| — |
kurs:search_and_replace.pl [2014/09/10 21:22] (current) |
||
|---|---|---|---|
| Line 1: | Line 1: | ||
| + | <code> | ||
| + | use strict; | ||
| + | use warnings; | ||
| + | my $search = $ARGV[0]; | ||
| + | |||
| + | my @strassen = ( | ||
| + | 'Blagasse 12', | ||
| + | 'Blag. 11', | ||
| + | 'Buh Gasse 1', | ||
| + | 'Bug G. 2', | ||
| + | ); | ||
| + | |||
| + | foreach (@strassen) { | ||
| + | $_ =~ s/(g)\./$1asse/ig; | ||
| + | printf "%s\n", $_; | ||
| + | } | ||
| + | |||
| + | # printf "%s\n", $search; | ||
| + | </code> | ||
kurs/search_and_replace.pl.txt ยท Last modified: 2014/09/10 21:22 (external edit)
Page Tools
Except where otherwise noted, content on this wiki is licensed under the following license: CC Attribution-Share Alike 4.0 International
