with Ada.Text_IO; use Ada.Text_IO;

with p_stringy; use p_stringy;


procedure packdemo is
	s: String:="Hello my name is computer, what is your name?#sdfsdfsdfsdfsdfsdfdsfsdf";
begin

	Put_Line( p_stringy.stringReplaceWith( s ,"name#","label#") );
	Put_Line( p_stringy.stringReplaceWith( s ,"name?#","thingy?#") );

end packdemo;