[PHP] pobierz, plaintext 
<?php
/*
 * ---
 * array str_translate() - Translating words with INTERIA.pl online dictionary
 * (c) 2007 tiraeth
 * ---
 * string sQuery: Word to translate (en, de or pl)
 * string sLanguage: Translate language (e.g. EN for en-pl and pl-en dict) [addit.]
 * string sEncoding: Encoding for return HTML structure of translation [addit.]
 *
 */
function str_translate( $sQuery, $sLanguage = 'en', $sEncoding = 'utf-8' )
{
	$aReturn = array('No data retrieved...');
	$sQuery = str_replace(' ', '%20', $sQuery);
	$sEncoding = strtolower($sEncoding);
 
	if ( !in_array( $sEncoding, array('utf-8', 'utf-16', 'iso-8859-1', 'iso-8859-2', 'windows-1250') ) )
	{
		$sEncoding = 'utf-8';
	}
 
	if ( $sLanguage == 'de' )
	{
		$file = file('http://tlumacz.interia.pl/niemiecki/szukaj/?utf8=1&q=' . $sQuery . '&jezyk=ni%7C13%7C-');
		$file = implode('', $file);
		$file = trim($file);
		$file = str_replace(array('r', 'n', 't'), '', $file);
 
		if ( $sEncoding != 'utf-8' && function_exist('iconv') )
		{
			iconv ( 'utf-8', $sEncoding, $file );
		}
 
		if ( preg_match_all('#<dl>(.*?)</dl>#is', $file, $data) )
		{
			$data = $data[0];
			$data[0] = preg_replace('# <a(.*?)>(.*?)</a>#i', '', $data[0]);
			$data[0] = str_replace(array('<span class="rodzaj">', '</span>'), array('<i>', '</i>'), $data[0]);
			$data[0] = strip_tags($data[0], '<br><strong><dt><dl><dd><i><ol><li>');
			$data[0] = str_replace(array('dt>', 'dl>', 'dd>', 't'), array('li>', 'ul>', 'li>', ''), $data[0]);
 
			$aReturn = array('de-pl' => $data[0]);
 
			if ( count($data) > 1 )
			{
				$data[1] = preg_replace('# <a(.*?)>(.*?)</a>#i', '', $data[1]);
				$data[1] = str_replace(array('<span class="rodzaj">', '</span>'), array('<i>', '</i>'), $data[1]);
				$data[1] = strip_tags($data[1], '<strong><dt><dl><dd><i><ol><li>');
				$data[1] = str_replace(array('dt>', 'dl>', 'dd>', 't'), array('li>', 'ul>', 'li>', ''), $data[1]);
 
				$aReturn['pl-de'] = $data[1];
			}
		}
	}
	else
	{
		$file = file('http://tlumacz.interia.pl/angielski/szukaj/?utf8=1&q=' . $sQuery . '&jezyk=an%7C12%7C-');
		$file = implode('', $file);
		$file = trim($file);
		$file = str_replace(array('r', 'n', 't'), '', $file);
 
		if ( $sEncoding != 'utf-8' && function_exist('iconv') )
		{
			iconv ( 'utf-8', $sEncoding, $file );
		}
 
		if ( preg_match_all('#<dl>(.*?)</dl>#is', $file, $data) )
		{
			$data = $data[0];
 
			$data[0] = preg_replace('# <a(.*?)>(.*?)</a>#i', '', $data[0]);
			$data[0] = str_replace(array('<span class="rodzaj">', '</span>'), array('<i>', '</i>'), $data[0]);
			$data[0] = strip_tags($data[0], '<strong><dt><dl><dd><i><ol><li>');
			$data[0] = str_replace(array('dt>', 'dl>', 'dd>', 't'), array('li>', 'ul>', 'li>', ''), $data[0]);
 
			$aReturn = array('en-pl' => $data[0]);
 
			if ( count($data) > 1 )
			{
				$data[1] = preg_replace('# <a(.*?)>(.*?)</a>#i', '', $data[1]);
				$data[1] = str_replace(array('<span class="rodzaj">', '</span>'), array('<i>', '</i>'), $data[1]);
				$data[1] = strip_tags($data[1], '<strong><dt><dl><dd><i><ol><li>');
				$data[1] = str_replace(array('dt>', 'dl>', 'dd>', 't'), array('li>', 'ul>', 'li>', ''), $data[1]);
 
				$aReturn['pl-en'] = $data[1];
			}
		}
	}
 
	return $aReturn;
}
?>
[PHP] pobierz, plaintext 

Jak używać? Wszystko w komentarzu. Funkcja zwraca nad array z kodem "HTML" z tłumaczeniami słówka.

Tam gdzie mamy 't', 'r', 'n' powinno być oczywiście '\t', '\r', '\n'
Ktoś niech kurde naprawi ten kod php, bo się zawsze rozsypują znaki \t, poza tym cudzysłowia też nie działają dobrze!!