Sponsored Content
Top Forums UNIX for Dummies Questions & Answers transforming small javascript into perl Post 302190353 by cbkihong on Tuesday 29th of April 2008 11:05:15 AM
Old 04-29-2008
Then that is a client-side Javascript problem. It has nothing to do with Perl even though Perl is used to generate the Javascript.

If what you want to do is to execute different bits of Javascript depending on condition. That is possible with Javascript alone. People are doing that all over the Web to address different browsers. Sometimes you may need to wrap the code in a try ... catch block to catch exceptions so that you can try several variations until finding one that works!

Of course, unless you have reasons to generate dynamic Javascript from Perl, moving all the javascript away from the HTML to a separate .js file that is sourced from the HTML esp. if you have lots of javascript. Then you can serve that JS file with Apache directly rather than wasting resources generating JS from Perl.
 

8 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Help Required In Transforming A File

How will i convert a file <LREC><L:EPOCH>1198331268.553</L:EPOCH><LDATE>10-12-07</LDATE><L:SERVER>NONE</L:SERVER><L:PORT>NONE</L:PORT><LTIME>13:47:48.553</LTIME><LTEXT>dnvdmxk</LTEXT></LREC>... (3 Replies)
Discussion started by: anju
3 Replies

2. UNIX for Dummies Questions & Answers

onChange + javascript in perl CGI - question

Hello all, Am trying to include a onChange java script to my perl CGI application which uses POST method to upload files to file_server This is how I embedded javascript in the perl code that renders CGI application print qq| <script type="text/javascript" src="display.js"> </script>... (4 Replies)
Discussion started by: matrixmadhan
4 Replies

3. Shell Programming and Scripting

transforming records

Hi all In input file I have records like this: 0,1,0,87,0,0,"6,87","170,03",0,"43,5",0,0,0,0,"6,87","126,53" and in output file I need that these records transforms in : 0 1 0 87 0 0 6,87 170,03 0 43,5 0 0 0 0 6,87 126,53 Could you help me in this case? Please (13 Replies)
Discussion started by: shizik
13 Replies

4. UNIX for Advanced & Expert Users

Transforming psmf to ogv

Hi all. I would like to create a program that converts psmf file format (PSMF - MultimediaWiki) to ogv (Ogg - Wikipedia, the free encyclopedia). I know C++ and I worked with BMPs (so I can understand a simple file system like the BMP header is) but I didn't touch any kind of sound/video file... (1 Reply)
Discussion started by: lilezek
1 Replies

5. Shell Programming and Scripting

How to use JavaScript in Perl Object Oriented

i am new to Perl CGI Object oriented. I want to use some java script in my Perl CGI but i am not able to do that. I am using Submit button then via param() i am getting all field parameters. But i want to validate all fields first then i want to move. But Use of Java script, i don't know (1 Reply)
Discussion started by: Navrattan Bansa
1 Replies

6. Shell Programming and Scripting

How to call perl web service from javascript?

Hi, I would like to call the below perl web service from javascript .Any help would be appreciated.I am new to web services.Please do the needful. Server Program(Perl Web Service) #!/usr/bin/perl use lib '/usr/lib/perl5/5.8.8/SOAP-Lite-0.65_3/lib'; use SOAP::Transport::HTTP; use Demo;... (3 Replies)
Discussion started by: liyakathali
3 Replies

7. Programming

Transforming data to other format

Dear All I would like to transform data from one format to another format. my Input: 0 0 1 0 1 0.308 0 2 0.554 0 3 0.287 output: Z (0,0)= 1 Z (0,1)=0.308 Z (0,2)=0.554 Z (0,3)=0.287 (2 Replies)
Discussion started by: bala06
2 Replies

8. UNIX for Dummies Questions & Answers

Transforming data so it looks like the one you specified

Lets say for instance I have this data within a file named transform xxx#yyy@zzz and I want it to be in the format ofZZZ xxx-yyy How do I go about doing this? (3 Replies)
Discussion started by: l3monz
3 Replies
Plack::Middleware::Deflater(3pm)			User Contributed Perl Documentation			  Plack::Middleware::Deflater(3pm)

NAME
Plack::Middleware::Deflater - Compress response body with Gzip or Deflate SYNOPSIS
use Plack::Builder; builder { enable sub { my $app = shift; sub { my $env = shift; my $ua = $env->{HTTP_USER_AGENT} || ''; # Netscape has some problem $env->{"psgix.compress-only-text/html"} = 1 if $ua =~ m!^Mozilla/4!; # Netscape 4.06-4.08 have some more problems $env->{"psgix.no-compress"} = 1 if $ua =~ m!^Mozilla/4.0[678]!; # MSIE (7|8) masquerades as Netscape, but it is fine if ( $ua =~ m!MSIE (?:7|8)! ) { $env->{"psgix.no-compress"} = 0; $env->{"psgix.compress-only-text/html"} = 0; } $app->($env); } }; enable "Deflater", content_type => ['text/css','text/html','text/javascript','application/javascript'], vary_user_agent => 1; sub { [200,['Content-Type','text/html'],["OK"]] } }; DESCRIPTION
Plack::Middleware::Deflater is a middleware to encode your response body in gzip or deflate, based on "Accept-Encoding" HTTP request header. It would save the bandwidth a little bit but should increase the Plack server load, so ideally you should handle this on the frontend reverse proxy servers. This middleware removes "Content-Length" and streams encoded content, which means the server should support HTTP/1.1 chunked response or downgrade to HTTP/1.0 and closes the connection. CONFIGURATIONS
content_type content_type => 'text/html', content_type => [ 'text/html', 'text/css', 'text/javascript', 'application/javascript', 'application/x-javascript' ] Content-Type header to apply deflater. if content-type is not defined, Deflater will try to deflate all contents. vary_user_agent vary_user_agent => 1 Add "User-Agent" to Vary header. ENVIRONMENT VALUE
psgix.no-compress Do not apply deflater psgix.compress-only-text/html Apply deflater only if content_type is "text/html" LICENSE
This software is licensed under the same terms as Perl itself. AUTHOR
Tatsuhiko Miyagawa SEE ALSO
Plack, <http://httpd.apache.org/docs/2.2/en/mod/mod_deflate.html> perl v5.14.2 2012-06-18 Plack::Middleware::Deflater(3pm)
All times are GMT -4. The time now is 10:13 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy