Your code looks quite tangled, but here's a quick observation:
Quote:
Originally Posted by ajayram_arya
...
Code:
#!/bin/ksh
echo " Enter the Directory Location of the dat file :"
read fname
cd $fname
echo " Current directory `pwd`:"
echo " Enter the filename : "
read Filename
if [ -f $Filename ];
then
echo " File exists."
sed 's/ /,/g' $Filename > $Filename.csv
print "Enter the size";
read size
$fontsize = $size <===== perl -F',' -lane 'BEGIN{
...
At the red colored line, the control is still in the shell script, hence that assignment won't work. The shell requires no spaces around the "=" operator. And also, shell variables do not have the "$" prefix.
Were you trying to assign a Perl variable ($fontsize) in that line? The shell does not interpret $fontsize as a Perl variable.
Quote:
Originally Posted by ajayram_arya
....Below is the code and can someone help me in taking user input for changing the font size for a html table ....
...
In order to pass a shell variable from a shell to Perl, you could export that variable and then use Perl's ENV hash to get it from within Perl.
An example follows; I am using Bash, but the code should be similar in Korn shell as well.
Code:
$
$ # Show the contents of my shell script
$ cat -n f17.sh
1 #!/usr/bin/bash
2 printf "Enter fontsize : " # prompt for fontsize from shell script
3 read FONTSIZE # read user input and assign to shell variable called FONTSIZE
4 export FONTSIZE # export the shell variable
5 echo "From the shell script: value of FONTSIZE = $FONTSIZE" # display message from the shell script
6 perl -le '$fs = $ENV{FONTSIZE}; # retrieve value of shell variable FONTSIZE from the ENV hash in Perl
7 print "From the Perl script : value of FONTSIZE = $fs" # and display message from the Perl script
8 '
9
$
$
$ # Now run it
$ ./f17.sh
Enter fontsize : 36
From the shell script: value of FONTSIZE = 36
From the Perl script : value of FONTSIZE = 36
$
$
I am using festival speech synthesis system and I would like to allow user input in a browser. This will be taken by a php page which is then supposed to pass the input text to a perl script. The perl script should pass this text to the festival engine by executing a unix command. this in turn... (2 Replies)
Hello,
I'm running a perl script to execute a program through my Unix command line. The program requires a user input but I want to automatically have perl input the string. Is there a way to do this?
Thanks (1 Reply)
Hi All,
Can we pass arguments while calling the perl script and as well as ask user input during execution of the script?
My program is as below:
I am passing arg1 and arg2 as argements to test.pl
]./test.pl arg1 arg2
Inside the test.pl I have :
print "Do you want a name ? (y/n) : ";... (2 Replies)
If I want all user input to start with " : " if not display error
or what I asking is how to do if statement that control a first letter of string that we want to start with. and not worry about the rest
Thank (1 Reply)
Hi, I want to list all file that match user input ( specified shell wildcard) but when I compile it dont list me
#!/usr/bin/perl -w
print "Enter Advance Search Function: ";
chomp ($func = <STDIN>);
my @files = glob("$func");
foreach my $file (@files)
{
print "$file\n";... (1 Reply)
Hi, How to create array every time user input and store user input and display all array
print " Enter input "
my @input = split(' ', $input)
chmop($input = <STDIN>;
foreach ($input)
{
@array= @input;
}
print @array"\n"; (1 Reply)
Hi,
I need to copy files from a source directory to a destination directory in unix.
I'm using the file::copy for the actual copy.
The problem is that the source and dest directories are supplied by different users, who might type the name of the directories in various combinations of lower... (6 Replies)
Please tell me how to write a perl script that asks the user to enter words and that passes them to a variable.
In bash, the "read" command would achieve such user interaction.
#!/bin/bash
read -p "Enter files: " vFiles
However, I am looking for perl version of something equivalent... (2 Replies)
I am creating a bash that uses perl . The below code closes before the input is entered. If I run the perl as a .pl it is fine. What am I doing wrong? Thank you :).
#!/bin/bash
cd 'C:\Users\cmccabe\Desktop\wget'
wget -O getCSV.txt http://xxx.xx.xxx.xxx/data/getCSV.csv
print... (4 Replies)
My question is basically as the title says. How can I check a user inputted string is only certain characters long (for example, 3 characters long) and how do I check a user inputted string only contains certain characters (for example, it should only contain the characters 'u', 'a', 'g', and 'c')... (4 Replies)
Discussion started by: Eric1
4 Replies
LEARN ABOUT MOJAVE
par::packer5.18
PAR::Packer(3) User Contributed Perl Documentation PAR::Packer(3)NAME
PAR::Packer - PAR Packager
DESCRIPTION
This module implements the App::Packer::Backend interface, for generating stand-alone executables, perl scripts and PAR files.
Currently, this module is used by the command line tool pp internally, as well as by the contributed contrib/gui_pp/gpp program.
Since version 0.97 of PAR, this module and its related tools such as "pp" have been stripped from the PAR distribution and are now
distributed as the "PAR-Packer" distribution so that PAR users need not necessarily have a C compiler.
SEE ALSO
PAR, pp
App::Packer, App::Packer::Backend
ACKNOWLEDGMENTS
Mattia Barbon for taking the first step in refactoring pp into App::Packer::Backend::PAR, and Edward S. Peschko for continuing the work
that eventually became this module.
AUTHORS
Audrey Tang <cpan@audreyt.org>
Steffen Mueller <smueller@cpan.org>
<http://par.perl.org/> is the official PAR website. You can write to the mailing list at <par@perl.org>, or send an empty mail to
<par-subscribe@perl.org> to participate in the discussion.
Please submit bug reports to <bug-par@rt.cpan.org>.
COPYRIGHT
Copyright 2004-2010 by Audrey Tang <cpan@audreyt.org>.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
See <http://www.perl.com/perl/misc/Artistic.html>
perl v5.18.2 2013-11-30 PAR::Packer(3)