/* Test the subr intrinsic */ proc main() { var a = "Hello, world"; var b; var i, n; b = a.subr( 3, 7 ); say( b, "\n" ); b[4] = 'W'; // Will not modify original array say( a, "\n" ); say( b, "\n" ); }