String matching: Difference between revisions

$ if offset .ne. length_of_first_string

$ then

$ else

$ write sys$output "first string does not contain the second string at any location"

<pre>$ @string_matching efabcdef ef

first string starts with second string

first string ends with the second string

$ @string_matching efabcdef ab

first string does not start with second string

first string does not end with the second string

$ @string_matching efabcdef def

first string does not start with second string

first string ends with the second string

$ @string_matching efabcdef defx