/ usr / bin / perl $ string = જોડણી ("-", "લાલ", "લીલા", "વાદળી"); પ્રિન્ટ "સ્ટ્રિંગ જોડે $ સ્ટ્રિંગ છે \ n"; $ સ્ટ્રિંગ = જોડાવા ("", "લાલ", "લીલા", "વાદળી"); પ્રિન્ટ "સ્ટ્રિંગ જોડે $ સ્ટ્રિંગ છે \ n"; $ સ્ટ્રિંગ = જોડાવા (",", "લાલ", "ગ્રીન", "વાદળી"); પ્રિન્ટ "સ્ટ્રિંગ જોડે $ સ્ટ્રિંગ છે \ n";