To finish this thread:

in your shell you enter following command:

./replace_emoticon.pl emoticon_file.txt

#!/usr/bin/perl

use strict;
use warnings;
# use utf8;
# use charnames ':full';
use open qw( :encoding(utf-8) :std );

while(<>) {
# foreach (/\x{1f618}/g) {print "hurray! And Here Is Your Emoticon!\n"};
# This Is Working!!!
# foreach (/\x{1f695}/g) {print "hurray! And Here Is Your Emoticon!\n"};
# This Is Working!!! This Is For The Taxi
        
s!\x{1f618}!\\includegraphics[height=15pt]{/Users/mstep/Documents/private_txt/anette/pix/emo01.png}!g;
        s/this/that/g;
        print $_;
}


I wish all members of this list happy holidays and a fulfilled new year 2015


marek

-- 
This is the BBEdit Talk public discussion group. If you have a 
feature request or would like to report a problem, please email
"[email protected]" rather than posting to the group.
Follow @bbedit on Twitter: <http://www.twitter.com/bbedit>

--- 
You received this message because you are subscribed to the Google Groups 
"BBEdit Talk" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to [email protected].
To post to this group, send email to [email protected].

Reply via email to